#top of script
use Data::Dumper;
....
my $www = $ua->request( $action );
print Dumper ($www);