data do servidor em perl
Publicado por leo genilhu 03/02/2004
[ Hits: 9.549 ]
Homepage: www.genilhu.com
script em perl simples, para iniciantes que pega a data do servido,e a separa em dd/mm/aa imprimindo na tela
#!/usr/bin/perl # #leo genilhu <leogenilhu@bol.com.br> # # data hora open(DATAHOR,"date '+%d/%m/%y %H : %M' |"); @Emisao = split(/ /,<DATAHOR>); //separa o array Emisao close DATAHOR ; chomp(@Emisao); // tira os espacos print @Emisao[0],"\n" ; print @Emisao[1],"\n" ; print @Emisao[2],"\n" ; print @Emisao[3],"\n" ; @data = split(/\//,@Emisao[0]); print @data[0],"\n" ; print @data[1],"\n" ; print @data[2],"\n" ;
Renomeando arquivos de forma padronizada
Lendo o conteúdo de uma página da Internet
Automatizando digitação de códigos 2FA no browser
Resolver problemas de Internet
Como compartilhar a tela do Ubuntu com uma Smart TV (LG, Samsung, etc.)
Como converter imagens PNG/JPEG para SVG em linha de comando
Fez porcaria no teu repositório Git? Aprenda a restaurar uma versão anterior do seu código!
Restaurando Fontes de Download do Hydra no Linux
Atualizando "na marra" o YT-DLP quando começa a dar erro de downloads
Como instalar o WPS com interface e corretor ortográfico em PT-BR no Arch Linux
Linux mint não desliga corretamente mesmo mexendo no grub (1)