Um valor época é um carimbo de tempo Unix que calcula o número de segundos que se passaram desde 1 de janeiro de 1970 . Este valor faz com que seja simples de realizar cálculos em datas em várias linguagens de programação. Em Perl, você chamar a função "tempo" para obter a data época . Você pode imprimir este valor para a tela, salvá-lo em uma variável, ou convertê-lo em uma data legível usando matrizes e função " localtime " do Perl. Instruções
1

Abra um arquivo de programa Perl. Coloque o cursor onde você deseja obter a data ea hora época
2 Tipo

" tempo de impressão ; " . (Sem aspas) . . Este código chama a função de tempo para obter o tempo de época , em seguida, imprime -lo para a tela
3

Digite o seguinte código:

minha época $ = tempo ;

my @ meses = ( "Janeiro " , "Fevereiro " , "Março " , "Abril ", " Maio " , "Junho " , "Julho " , "Agosto " , "Setembro " , "Outubro " , "Novembro " , "Dezembro ");

my @ dias = ( "Sun" , "Mon ", " Ter ", " Qua ", " Qui ", " Sex ", " Sáb ");

my ($ seg , $ min, $ hora , $ dia, $ mes , $ ano, US $ wday ) = ( localtime ( $ época ) ) [ 0,1,2,3,4,5,6 ];

print " valor Epoch " . $ época . "\\ n" ;

print " Converte para : " . $ dias [$ wday ] . " , " . $ meses [$ mês ] . " " . $ dia . " , " . ( $ ano 1900 );

Este código obtém o número época e salva-lo em uma variável. Em seguida, cria duas matrizes , uma para meses e uma para dias de semana. A próxima linha utiliza a função " localtime " para converter a data época em variáveis ​​separadas , cada uma com diferentes partes de uma data e hora. As duas últimas linhas imprimir o valor época em uma linha e sua data correspondente , incluindo o dia da semana , mês, dia do mês e ano na próxima linha .
4

Salve o arquivo de programa Perl. < Br >