use WWW::Mechanize;
use encoding 'utf-8';
binmode STDOUT, ':utf8';
....
$mech->submit_form(form_name => 'form');