Select Code to Download

#!/usr/bin/perl -w

...

my $response_to_discard = $browser->post(@req);
print $response_to_discard->as_string();

my $resp = (POST 'www . wheresmycellphone . com/', ['txtisdcode' => 1,
+  txtcitycode' => '000', 'txtphone' => '0000000']);