http://www.perlmonks.org?node_id=368705

dba has asked for the wisdom of the Perl Monks concerning the following question:

Dear Monks,
I have to identify the Netgear router IP address from one of the machines connected within a perl script. The machine IP address will be 192.168.0.x, however I need to know the Internet IP address of the router NIC.
Thanks,
dba