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