Hi the following is my code to access a normal website without password.
use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
$ua = LWP::UserAgent->new(); # create a new connection by using LWP module
my $address = "http://enterprise.i2r.a-star.edu.sg/.../patch/bin/files.cgi";
my $req = POST "$address", [ seqStat => "SAV", usr_seq => "try.seq", file => "$outfile", group => "all", minLen => 8, mismatch => 0, penalty => 100, boundary => 87.5];
But if the website is password protected, and of course I have the user id and password, how to do it in perl?
Thank you very much.
use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
$ua = LWP::UserAgent->new(); # create a new connection by using LWP module
my $address = "http://enterprise.i2r.a-star.edu.sg/.../patch/bin/files.cgi";
my $req = POST "$address", [ seqStat => "SAV", usr_seq => "try.seq", file => "$outfile", group => "all", minLen => 8, mismatch => 0, penalty => 100, boundary => 87.5];
But if the website is password protected, and of course I have the user id and password, how to do it in perl?
Thank you very much.