converta para epoch e volta

Question

Eu usei as seguintes duas linhas de comando perl com êxito:

perl -e 'use Time::Local; print timelocal(7,51,10,22,3,2014), "\n";'

que retorna 1398163867 e

perl -e 'print scalar(localtime(1398163867)), "\n"'

que retorna Tue Apr 22 10:51:07 2014

O que eu gostaria de fazer é substituir 7,51,10,22,3,2014 e 1398163867 por uma variável contendo esses valores. Como posso fazer isso?

    

Answer 1

Se você quer dizer uma variável de shell:

t=7,51,10,22,3,2014
perl -MTime::Local -le 'print timelocal split ",", shift' -- "$t"

t=1398163867
perl -le 'print scalar localtime shift' -- "$t"