use HTTP::Request::Common qw(POST);
  use LWP::UserAgent;
  $ua = LWP::UserAgent->new;

  my $req = POST 'http://www.host.com/login.php?sid='.@sids[0],
                [ username => 'myUserName', password => 'myPasswd', login => 'Connexion' ];

  print $ua->request($req)->as_string;