Get the remainder
#!/usr/bin/perl -w print "15 divided by 6 is exactly ", 15 / 6, "\n"; print "That's a remainder of ", 15 % 6, "\n";