#!/usr/bin/perl -w use strict; use IO::Socket; use Sys::Hostname; my $name = hostname(); my $ip = inet_ntoa(scalar gethostbyname($name)); printf("$ip\n");
O programa acima sempre retornara o endereco ip da maquina , estando ele associado ao hostname.
Miguel da Silva wrote:
Ol� para todos ... algu�m conhece qual � a vari�vel (se � que existe...) que retorna o IP que a m�quina est� usando?!?! Imagino que se uso DHCP o valor dessa vari�vel mudar� quando eu der resete na m�quina, certo?
At� logo para todos.
Miguel.
--
"Primeiro eles o ignoram. Depois, riem de voce. Chega um ponto em que lutam contra voce. Ate o dia em que voce vence." Gandhi
SlackWare user #349702
--------------------------------------------------------------------------- Esta lista � patrocinada pela Conectiva S.A. Visite http://www.conectiva.com.br
Arquivo: http://bazar2.conectiva.com.br/mailman/listinfo/linux-br Regras de utiliza��o da lista: http://linux-br.conectiva.com.br FAQ: http://www.zago.eti.br/menu.html
