Hello friends ,

I have a problem like there is web application and i have to write
a script that should login to the application and then move other parts
of the application

use HTTP::Request::Common qw(POST);
 use LWP::UserAgent;
 use Data::Dumper;

$ua = LWP::UserAgent->new(keep_alive=>1);

my $req = POST "http://servername.com:5002/index.php",
         ['user_name' => 'username',
          'user_password'=>"password",
          'module'=>'Users',
          'action'=>'Authenticate',
          'return_module'=>'Users',
          'return_action'=>'Login',
        ];
my $res = $ua->request($req);
print Dumper(\$res);
if ($res->is_success){
        print $res->as_string;
}

when i try this code i am not able to login to the application
it says 302
that is found , but with no data
i want to do like if i post username/password with all required things then it should return the home page of the application

and keep the connection live to move other parts of the application

Thanks
maxj

try print $res->content; rather then print $res->as_string. The only thing is that, if the post successful then it will retrieve the contents of that whole page as source code (HTML format). you can save the ref. to a string if need be.