print qx "myperlscript.pl?var1=1&var2=2";
system("myperlscript.pl?var1=1&var2=2");use 
my $response =LWP::UserAgent->new->get("myperlscript.pl?var1=1&var2=2");