Help for this page
package My::TimeCalc; ... } 1;
use strict; use warnings; ... my $t = ($t1 * 4) + $t2; print($t,"\n"); # 102:12,62