use Data::Dumper;
...
my $ua = LWP::UserAgent->new;
print Dumper $ua;
...
my $res = $ua->get(...);
print Dumper $res;
...