my $account = "blah";
my $password = "blah";
my $ip = exec "/sbin/ifconfig ppp0";
get ("http://www.myip.org/cgi-bin/Update.py?id=$account&pwd=$password&hostname=all&ip=$ip");