Select Code to Download

$mech->submit_form(
    form_number => 2,
...
        course => $prefix,
        },
    );

use WWW::Mechanize;
use HTML::TokeParser;
...
$mech->click_button( name => 'submit' );

print $mech->content();