Select Code to Download

require "testsuite.pl";
open_browser(optional machine info);
...
          field2 => "value2");
submit_form(optional button or image to click);
verify_page(some info to verify);

$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/