##
$mech->get( "http://fraser.qimr.edu.au/general/daleN/ssSNPer/" );
$mech->form_number(1);
$mech->field("testSNP"=>"/tmp/hapmap/rs11581638_name.txt");
$mech->field("HapMapData"=>"/tmp/hapmap/rs11581638_data.txt");
my $request=$mech->submit();
my $content=$request->content;
print $content;