data do servidor em perl
Publicado por leo genilhu 03/02/2004
[ Hits: 9.412 ]
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" ;
Calculando a média entre dois valores
Calcula equação de segundo grau completa
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Como renomear arquivos de letras maiúsculas para minúsculas
Imprimindo no formato livreto no Linux
Vim - incrementando números em substituição
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Não to conseguindo resolver este problemas ao instalar o playonelinux (1)
Excluir banco de dados no xampp (1)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta