from epoch to date string

[Farid Hamjavar UNM-CIRT]

greetings,

is there a revers of this below -- in a one-liner format?
i.e. input to be `date` and output to be number of
seconds since epoch.

% perl -e 'print scalar localtime (1061161826), "\n"'
Sun Aug 17 17:10:39 MDT 2003



Thanks
Farid

[Abigail]

Farid Hamjavar UNM-CIRT (hamjavar@unm.edu) wrote on MMMDCXXXVIII
September MCMXCIII in <URL:news:bhp22n$2dbu$1@argo.unm.edu>:
`' greetings,
`'
`' is there a revers of this below -- in a one-liner format?
`' i.e. input to be `date` and output to be number of
`' seconds since epoch.
`'
`' % perl -e 'print scalar localtime (1061161826), "\n"'
`' Sun Aug 17 17:10:39 MDT 2003


Dat lijkt me onmogelijk. Your number of seconds ends with '6', and
the reported date/time ends with '9' in the seconds range.

$ perl -e 'print scalar localtime (1061161826), "\n"'
Mon Aug 18 01:10:26 2003

which would be

Sun Aug 17 17:10:26 MDT 2003

Anyway, the reverse:

$ perl -MTime::Local -wle 'print timelocal 26, 10, 1, 18, 7, 103'
1061161826



Abigail
--
perl -e '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
/ / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /
% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % %;
BEGIN {% % = ($ _ = " " => print "Just Another Perl Hacker\n")}'