----- Original Message -----
From: "John.F.Kennedy" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, March 30, 2001 2:57 PM
Subject: Getting the number of minutes pass midnight
>
> Does any one know how to get the number of minutes pass midnight for a
> given time using perl.
>
($sec,$min,$hour,$dom,$mon,$year)=localtime(time);
$min_since_midnight = int (($sec + ($min*60) + ($hour * 60 * 60)) /60);
print "$min_since_midnight\n";
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
