I tried the script, adding the dump line again and it came back with the following results

A successfull 200 OK comes out like this

E:\ovXtras\SCRIPTING>debugurltestv5.pl  http://www.elm.com.sa
http://192.168.5.5:8080/
200 OK
Err : (9)(Bad file descriptor)(0)()

Can't locate object method "dump" via package "HTTP::Headers" at (eval
+ 28) line 1.
[download]

while an unsuccessful attempt has some additional info

E:\ovXtras\SCRIPTING>debugurltestv5.pl  https://www.ehealth.com.sa
http://192.168.5.5:8080/
500 Internal Server Error
Err : (9)(Bad file descriptor)(10038)(An operation was attempted on so
+mething that is not a socket)

Can't locate object method "dump" via package "HTTP::Headers" at (eval
+ 28) line 1.
[download]

Can anything be concluded from this?

My present code below

# !C:\Perl\bin



use strict;
use warnings;

use LWP::UserAgent;

#@ARGV = qw[  http://www.eserve.com.sa/ ];

my $url       = shift or die "URL expected\n";
my $useragent = LWP::UserAgent->new;

$useragent->proxy(['http', 'ftp','https'], 'http://192.168.5.5:8080/')
+;
$useragent -> timeout( 20 );

my $request   = HTTP::Request->new( GET => $url );
my $response  = $useragent->request($request);
my $err = sprintf "(%d)(%s)(%d)(%s)\n", $!,$!,$^E,$^E;
print $useragent->proxy('http'),"\n";
print $response->status_line, "\n";
print "Err : $err \n";
print $response->dump,"\n";
[download]