Searched refs:doprint (Results 1 – 1 of 1) sorted by relevance
478 sub doprint { subroutine579 doprint "$hours hour";580 doprint "s" if ($hours > 1);581 doprint " ";585 doprint "$minutes minute";586 doprint "s" if ($minutes > 1);587 doprint " ";590 doprint "$time second";591 doprint "s" if ($time != 1);595 doprint "\n";[all …]