#!/usr/bin/perl                                                                                
require LWP::UserAgent;                                                                        
my $ua = LWP::UserAgent->new;                                                                  
my $response = $ua->get('http://example.com/url_home_page.pl/php?login=login&password=password');  
print "Content-type: text/html\n\n";                                                           
print $response->content;