CODE
    $mech->submit_form(
        form_number => $number,
        fields      => \%fields,
        
    ) or die "Error";
}

##</code><code>##

ERROR

Software error:
 at /usr/lib/perl5/site_perl/5.8.5/WWW/Mechanize.pm line 1492.