#!/usr/bin/perl for (qw(9:01PM 3:30AM 1:10AM)) { if (m{^(\d+):(\d\d)(AM|PM)}) { print "$_ is @{[$1*60+$2+($3 eq 'PM' ? 12*60 : 0)]} minutes\n" +; }; };
In reply to Re: current time between two time
by clueless newbie
in thread current time between two time
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |