Perl コーディング初心者質問コーナー Part26

[0739 nobodyさん 03/08/09 12:33 ID:???]

>>703
&error('不正な値が混じってます') unless grep{$hoge eq $_}($foo,$bar,$baz);
とか