http://search.cpan.org/author/MSERGEANT/Time-Object-1.00/Seconds.pm
that can do it too.
> -Original Message-
> From: Rob [mailto:[EMAIL PROTECTED]]
> Sent: Friday, September 06, 2002 1:19 PM
> To: [EMAIL PROTECTED]
> Subject: hours minutes and seconds in seconds
>
>
> I'm working on a script that parses a log file which gives
> connection time
> in seconds. Below is how I resolved the problem but I think
> there must be
> a better way?
>
> #!/usr/bin/perl -w
>
> use strict;
>
> my $sessionTime = 4000;
>
> my $hour = $sessionTime / 3600;
> my $hr = int($hour);
> $sessionTime = $sessionTime - ($hr * 3600);
> my $minute = $sessionTime / 60;
> my $min = int($minute);
> my $sec = $sessionTime - ($min * 60);
> print "$hr hour $min minutes and $sec seconds.\n"
>
>
> Rob
>
> Good judgement comes from experience, and experience -
> well, that comes from poor judgement.
>
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]