116 ◆MUMUMUhnYI (sage) 2005/11/11(金) 15:41:18 ID:d6RFRwJS0
こんなかんじで。
if 文があまりにも冗長になり、長々しくて条件判断を間違えそうなので
(実際私はsaku関係で間違えた)、
これでいこうかなと。
#############################################################################
# 現在の板系列が指定した名前かどうか
#############################################################################
sub BoardGroup
{
my ($GB, $board) = @_;
if($GB->{FORM}->{'bbs'} =~ /$board/) { return 1; }
return 0;
}