別にハマらんけど。
フォームからファイルをアップしたとき、ブラウザによって処理を変える必要がある。
以下、理由。
die Dumper $c->req->param('hoge');
■Firefox
"$VAR1 = 'file.gif';"
■IE
"$VAR1 = 'Z:\\TEMP\\file.gif';"
というわけで。
IE死ねばいい
もしくは
my $file = $c->req->upload('hoge');
my $filename = (split /\\/, $file->filename)[-1];