Amon2をCGIで利用

Amon2を使ってWebフォームを作ったりするが
大人の事情でCGIしか使えなかったりする

http://ucwd.jp/blog/644
とか
http://d.hatena.ne.jp/sugyan/20100705/1278268089
とかを参考にCGIファイルを作って動かすが
webapp.cgiなんてファイルが見えるのはかっこ悪いので

rewriteを使って隠す

RewriteEngine On
RewriteRule ^webapp.cgi - [L]
RewriteRule ^(.*)$ /webapp.cgi/$1 [L,QSA]

けどuri_for()を使うとCGIファイル名でリンクしちゃうので
安直だけど

--- ~/local/lib/perl5/Amon2/Web.pm.orig 2011-10-09 08:24:59.000000000 +0900
+++ ~/local/lib/perl5/Amon2/Web.pm 2011-10-13 15:52:38.158019121 +0900
@@ -142,7 +142,7 @@
 
 sub uri_for {
     my ($self, $path, $query) = @_;
-    my $root = $self->req->{env}->{SCRIPT_NAME} || '/';
+    my $root = '/';
     $root =~ s{([^/])$}{$1/};
     $path =~ s{^/}{};

とした
ばっどのうはうだけどどうしたもんか...