Michael,
Most likely you got a ton of emails on this one - here you go Ciao!
use Date::Manip;
my ($mydate) = (${\&ParseDate("today")} =~ /(\d{2}:\d{2}:\d{2})$/);
print "$mydate\n";
The routine ParseDate - takes today or a variable containing a date
and returns yyyymmddhh:mm:ss
I use the structure ${} with a pointer \& to the ParseDate return telling
perl to give me back the result and then I send it through a regex and put
it back into mydate.
-----Original Message-----
From: Michael C. Podlesny [mailto:[EMAIL PROTECTED]]
Sent: Friday, August 09, 2002 7:58 AM
To: [EMAIL PROTECTED];
[EMAIL PROTECTED]
Subject: Displaying time in PERL
can anyone tell me how to get the time in the format of "hh:mm:ss"?
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
