use WWW::Mechanize;
$mech = WWW::Mechanize->new();
$mech->get('file://localhost/tmp/bob.html');
$resp = $mech->submit();