My current code looks like this

my $mech = WWW::Mechanize->new;

$mech->get($url);
$mech->follow_link( text_regex => qr/Please click here/ );
$mech->submit_form(
    form_number => 1,
fields      => {
        aupAgree       => '1'
    },
);
[download]