my $uri = URI->new("$webSite/LOGIN"); $uri->query_form( 'credential_0' => $user, 'credential_1' => $password, 'destination' => $webPage ); $res = $ua->get($uri); print "Status: " . $res->status_line . "\n"; die "Unable to log in: " . $res->status_line unless ( $res->status_line =~ /200 OK/ );