そういえば，mod_perl2でディレクトリが変なとき sub BEGIN{ $ENV{SCRIPT_FILENAME} =~ /(.+\/)/; chdir($1); }こんな感じで対処がよさげデス．

http://ingres.t.u-tokyo.ac.jp/Lecture/WebApplication/ わかりやすいですわ

だいぶわかってきたんだが，次は最近更新された20個というのの求め方に苦悩している． select * table order by LASTUPDATE desc; これで，最終更新で降順したのは取り出せると思うんだけど，最新20というのがわからない． いっそ，($sth->fetchrow_array())…

id:PaiNさんから教えていただいた． select * tablename order by LASTUPDATE desc limit $LIMIT offset $OFFSET; これでok. もちろんユーザーからくる$OFFSETはs/\D//gとしてますYO!