Dear All,
is it possible in Perl to find the outside ip-address from an adsl-router without using an outside box.
i need to restart a script when the outside address of the router changes
Yeah, use LWP to goto 'http://privacy.net/' and run the following regex against the results:
/Your IP address is (\d+\.\d+\.\d+\.\d+)<br>/
The router's outside IP should be in $1.
-- Andrew Gaffney Network Administrator Skyline Aeronautics, LLC. 636-357-1548
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>