Help for this page

Select Code to Download


  1. or download this
    Time::Piece->from_mysql_datetime()
  2. or download this
    Time::Piece->strptime()
  3. or download this
    #!/usr/local/bin/perl

...
print "Test time: " . $test_time . "\n";
$diff = $test_time - $time;
print $diff->minutes . " minutes\n";
  4. or download this
    [root@posiedon3 johnday]# perl timepiece.pl
Local time:  Fri Mar  5 20:44:17 2004
...
               ], 'Time::Piece' );
Test time: Fri Mar  5 20:30:00 2004
-314.283333333333 minutes