Select Code to Download

my $response =LWP::UserAgent->new->get("http://www.mydomain.com/myperl
+script.pl?var1=1&var2=2");

use LWP::Simple;
my $data = get("http://www.mydomain.com/myperlscript.pl?var1=1&var2=2"
+);