I can't get any response from the location I am trying to contact. I can reach 
an external location like www.yahoo.com without any problem. When I use my web 
browser I have no problem receiving a response from the CGI even if I give bad 
information to the POST. I know I am not using a proxy. Please pardon my email 
program for the wordwrap...

use LWP::UserAgent;
$ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(POST => 
'http://www.informatics.jax.org/searches/homology_report.cgi');
$req->content_type("application/x-www-form-urlencoded");
$john = 
qw(order=symbol&include=""&*limit=0&_Species_key=""&op:symname=begins&);
$john .= qw(symname=abl1);
$jonh.=qw(&symnameBreadth=CWS&cmp_Species_key=""); 
my $res = $ua->request($req);
print $res->code,'\n';

Thank you,

Greg Touchton    \\   /=====|   
540-552-5967      \\ //  =|
338 Shenandoah Cir \//   =|

Reply via email to