うわわーん、 はてブコメント でいっぱいツッコミもらったよー!

というわけで 訂正しました 。 お騒がせして申し訳ないです。

# 2007年04月06日 sfujiwara sfujiwara perl ($hoge eq 'hoge', 'fuga') -> (($hoge eq 'hoge'), 'fuga') だから常に真になっているだけのような。perl6なら $hoge eq 'hoge' | 'fuga' ってできるか

なるほど、Perl6だとそういう書き方できるですか。Perl5の間はおとなしく $hoge eq 'hoge' || $hoge eq 'fuga' って書かないといけないのかあ。なんかいい解決法無いかな。

(@587)

なんか

No tables found in database, nothing to load at /usr/share/perl5/DBIx/Class/Schema/Loader/Base.pm line 452, <DATA> line 855.

とか出るのでおかしいなと思ったら、Debian sidで入るlibdbd-mysql-perlとlibdbix-class-schema-loader-perlのバージョンの問題だったらしい。

Catalyst::Helper::Model::DBIC::Schema. No tables found in database. というMLのアーカイブによれば、

Recent versions of DBD::mysql (4.002+) changed the behavior of the method that the DBIx::Class::Schema::Loader uses to find the list of tables to load, which causes this problem. Upgrade DBIx::Class::Schema::Loader to 0.03010 to get the fix.

とのことで、DBD::MySQLの4.002移行はDBIx::Class::Schema::Loaderは0.03010以降じゃないと使えないのだそうで。今手元のsidは、

ii  libdbd-mysql-p 4.004-1
ii  libdbix-class- 0.03009-1

なので、そりゃ動かないわな、と。

めんどくせえ、開発環境はetchにするべきか。

(@965)

＠ BTSにもあがってら: