1.)use LWP::UserAgent;
2.)use strict;

3.)my $user = '';
4.)my $pass = '';

5.)my $ua = LWP::UserAgent->new();
6.)my $resp = $ua->get("http://www.webmail.com/login?u=".$user."&password=".$pass );

7.)die if !$resp->is_success; 

#the rest of code here ----------->