my $account="blah"; 
my $password="blah2"; 
my $ip=`/sbin/ifconfig ppp0`; 
 
if ($ip=~/inet addr:(\d+\.\d+\.\d+\.\d+)/) { 
        get ("http://www.myip.org/cgi-bin/Update.py?id=$account&pwd=$password&hostname=all&ip=$1"); 
}