
davorg
Thaumaturge
/ Moderator
Sep 10, 2002, 12:37 PM
Post #2 of 3
(296 views)
|
It depends what format your times are in, but here's an example.
#! /usr/bin/perl -w use strict; use Time::Piece; my $t1 = Time::Piece->strptime('12:30:00', '%H:%M:%S'); my $t2 = Time::Piece->strptime('12:35:40', '%H:%M:%S'); my $diff = $t2 - $t1; print "Diff is ", $diff->seconds, " seconds\n"; -- Dave Cross, Perl Hacker, Trainer and Writer http://www.dave.org.uk/ Get more help at Perl Monks
|