Keeping true to tradition, here is yet another version that returns what you asked for:
my($sec,$min,$hour) = localtime(time()); my $strTime = sprintf "%02d:%02d:%02d", $hour,$min,$sec; print $strTime,"\n"; > -----Original Message----- > From: Michael C. Podlesny [mailto:[EMAIL PROTECTED]] > Sent: Friday, August 09, 2002 4:58 PM > 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
