#!/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

Responder a