There is a simpler way:
sub format_time { my ($h, $m, $s) = @_; return sprintf "%02d%02d%02d", $h, $m, $s; }
In reply to Re: scalar number with preceding 0.
by pbeckingham
in thread scalar number with preceding 0.
by PerlingTheUK
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |