in reply to Detecting when my ISP changes my IP
How about this?
use IO::Socket::INET; $s = IO::Socket::INET->new ( PeerAddr =>"1.2.3.4", Proto =>"udp", ) or die "no socket!\n"; print $s->sockhost, " ", scalar(gethostbyaddr($s->sockaddr,$s->sockdomain)),"\n";
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Detecting when my ISP changes my IP
by Aristotle (Chancellor) on Sep 22, 2002 at 11:58 UTC |