Вы можете сделать что-то подобное с Perl, если у вас есть POSIX::strptime
Пример программы (totimestamp.pl):
#!/usr/bin/perl
use strict;
use POSIX ("tzset", "mktime");
use POSIX::strptime;
POSIX::tzset ();
my $ARGC= scalar (@ARGV);
my $tstamp;
if ($ARGC < 1) {
$tstamp= time ();
} else {
my $tstr= $ARGV[0];
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst);
($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) =
POSIX::strptime($tstr, "%b %d %H:%M:%S %Y");
$tstamp= POSIX::mktime ($sec, $min, $hour, $mday, $mon, $year);
}
printf ("%d\n", $tstamp);
Использование:
perl ./totimestamp.pl "Nov 16 14:40:00 2018"
1542375600