data do servidor em perl
Publicado por leo genilhu 03/02/2004
[ Hits: 9.433 ]
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" ;
Aprendendo a fazer equações em Perl
Soma varios valores e mostra sua media
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
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
Compartilhamento de Rede com samba em modo Público/Anônimo de forma simples, rápido e fácil
Cups: Mapear/listar todas as impressoras de outro Servidor CUPS de forma rápida e fácil
Criando uma VPC na AWS via CLI
Tem como instalar o gerenciador AMD Adrenalin no Ubuntu 24.04? (15)
Tenho dois Link's ( IP VÁLIDOS ), estou tentando fazer o failover... (0)
Pendrive não formata de jeito nenhum (4)