my $request = HTTP::Request->new(GET => "$url"."$path"); my $result = $browser->request($request); open (IMAGE, ">$n.gif") or die "!!!! unable to write image to $n.gif $!"; binmode (IMAGE); print IMAGE $result->decoded_content; close IMAGE or die "!!!! could not close image $n.gif: $!";