localtime.pl
Publicado por Fábio Berbert de Paula 13/11/2002
[ Hits: 7.256 ]
Homepage: https://www.instagram.com/alexabolada/
Mostra o funcionamento da função localtime(), usada para capturar a data e hora do sistema ou calcular diferenças entre datas.
#!/usr/bin/perl ##################################### # localtime.pl # # Por Fábio Berbert de Paula # E-mail: fabio@vivaolinux.com.br # Estou em: www.vivaolinux.com.br # # Rio de Janeiro, 14 de Agosto de 2002 ##################################### my ($dia,$mes,$ano) = (localtime(time))[3,4,5]; $mes++; $ano += 1900; print "Hoje é dia " . sprintf("%02d",$dia) . '/' . sprintf("%02d",$mes) . '/' . $ano . "\n"; # um dia tem 86400 segundos = 60 segundos x 60 minutos x 24 horas # se quero saber que dia era a 100 dias atrás ... my $cemdias = 60*60*24*100; my ($dia,$mes,$ano) = (localtime(time - $cemdias))[3,4,5]; $mes++; $ano += 1900; print "A 100 dias atrás estávamos em " . sprintf("%02d",$dia) . '/' . sprintf("%02d",$mes) . '/' . $ano . "\n"; # localtime() retorna um array com os seguintes elementos: # 0 - segundo # 1 - minuto # 2 - hora # 3 - dia # 4 - mês # 5 - ano # 6 - dia da semana # 7 - dia do ano # 8 - isdst # # Nota: # # mes precisa ser adicionado de + 1, pois é um array de 0 à 11 # ano precisa ser adicionado de 1900, por causa do bug do milênio
Saiba quanto de energia seu PC gasta aproximadamente por mês
Lista de números aleatórios não-repetidos de um intervalo em Perl
Soma varios valores e mostra sua media
Nenhum comentário foi encontrado.
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
E a guerra contra bots continua
Tradução do artigo do filósofo Gottfried Wilhelm Leibniz sobre o sistema binário
Conheça o firewall OpenGFW, uma implementação do (Great Firewall of China).
Instalando o FreeOffice no LMDE 6
Anki: Remover Tags de Estilo HTML de Todas as Cartas
Colocando uma opção de redimensionamento de imagem no menu de contexto do KDE
[Shell Script] Script para desinstalar pacotes desnecessários no OpenSuse
[Shell Script] Script para criar certificados de forma automatizada no OpenVpn
[Shell Script] Conversor de vídeo com opção de legenda
[C/C++] BRT - Bulk Renaming Tool
[Shell Script] Criação de Usuarios , Grupo e instalação do servidor de arquivos samba