#!/usr/bin/perl

use LWP::Simple;
$content = get("http://checkip.dyndns.org");