in reply to grep integer and fractional part from a division (modulus ?)

How about... 
my ($a, $b) = split(/\./, (301/60));

[download]
That?

-InjunJoel
"I do not feel obliged to believe that the same God who endowed us with sense, reason and intellect has intended us to forego their use." -Galileo

In Section Seekers of Perl Wisdom