DBICでNOT LIKE 下記のようにすればいいっぽいです。my $hit = $schema->resultset('テーブル名')->search({ 列名 => {'NOT LIKE', '%' . $target . '%'} });にしても、DBICとかましてやCatalystとかになると情報が少なくて結構辛いです。 Web系の開発をメインでやっている訳ではないので、たまに使おうとするとフレームワークの更新追いかけるだけで一苦労。 でも、各種脆弱性への対応を考えるよりは面倒なところはフレームワーク任せにした方が楽だと思いますし、学習コストととの兼ね合いが難しい限りです。 stashとconfig Catalystでの話。 $c->configには普通ConfigLoaderなどで初期値のみを入れて読み出しのみでしか使いませんが、実はこの値、上書き可能だったりします。 そうすると

プログラマー必見。あの「シムシティ」のソースコードが公開 編集部：松本隆一 写真は「シムシティ4」です 元祖箱庭シムにして天才ゲームクリエイター，ウィル・ライト氏の出世作である，シムシティシリーズ。登場以来約20年を経てなお最新作，「シムシティ ソサエティーズ」がリリースされるという，世界中に数多くのファンを抱えたエポックメイキングな作品だ……なんてことは，いまさら言わなくてもとっくにご存じですね。 そんなシムシティがGPL（General Public License）準拠のオープンソースとして公開されたというのだから，ちょっと気になる話である。 この一件，もともとは100ドルPCで知られるOLPC（One Laptop per Child）のDon Hopkins氏による，Sim CityをLinuxで実現するというプロジェクトからスタートしているようだ。ちなみに，OLPCは，マサチュ

bradとmyとuse fieldsとPseudo-hashesとHash::Utilと bradプロダクトではuse fieldsが多用されています。そして、 my ClassName $var;のような変数宣言が多用されています。 perldoc -f myしてみるとuse fieldsで使うみたいな事が書いてありました。 use fieldsってのは package Jitensya; use strict; use warnings; use fields qw/(sound); sub new { my $proto = shift; my $self = ref $proto ? $proto : fields::new($proto); $self; } 1; のようなコードがあるとして use strict; use warnings; use Jitensya; my $