Select Code to Download

$agent->tick($chk_visa,'Visa');

use CGI::Pretty qw(:standard);

...
      submit('go'), end_form, end_html,
   ;
}

use WWW::Mechanize;
use Test::More qw(no_plan);
...
$bot->submit;

is( $bot->content(), 'Visa', "Got expected content" );