[snip header, locations, comments, and other fluff] use LWP::Simple; require LWP::UserAgent; # First, let's get the data from the web server. $ua = LWP::UserAgent->new(); $ua->agent("Argus Remote Waterfall v.01a"); $ua->timeout ($timeout); my $response = $ua->get($fetchpage); foreach(split(//,$response)) { if (!$response->is_success) { die $response->status_line; } printf("%01x ", ord($_)); print "\n" if $_ eq "\n"; } #### 48 54 54 50 3a 3a 52 65 73 70 6f 6e 73 65 3d 48 41 53 48 28 30 78 38 34 38 31 65 34 34 29