Obter Nome e IP do Host
Publicado por Dennis Henrique Leandro da Silva (última atualização em 11/11/2011)
[ Hits: 7.743 ]
Um script simples, mas muito util para saber o nome e ip do host local!
Pode ser adaptado para gravar num arquivo, ou então se conectar a um host remoto e enviar a ele o resultado!
Adapte-o conforme sua necessidade!
Abraço
#!/usr/bin/perl use strict; use warnings; use Socket; use Sys::Hostname; #Script para obter nome e ip do computador que está executando o script! #Simples mas muito util para algumas aplicações! my $HostName = hostname(); my $IpAddr = inet_ntoa(scalar gethostbyname($HostName || 'localhost')); print "\n\n$HostName\n"; print "$IpAddr\n\n";
Instalação automatizada do Squid 2.5 STABLE14
Enviando notificações do Nagios para o MSN
Script de conectividade wireless
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
O que você está ouvindo agora? [2] (188)
warsaw parou de funcionar após atualização do sistema (solução) (10)