#!/usr/bin/perl use Date::Manip; my $secs = UnixDate('03-DEC-02', '%s'); print "$secs\n"; #see perldoc Date::Manip for details on #formats for seconds, fractional seconds, and timezones