Try something like this snippet:

use HTTPFetch;
my $sock = HTTPFetch->connect('www.microsoft.com', 80) 
    or die "Couldn't connect: $!\n";
[download]

My guess is the error's in there somehow.