0650nobodyさん
2006/06/16(金) 08:29:16ID:???if ($email =~ s/\n|,/) {$flag = 1}
if ($subject2 =~ s/\n/) {$flag = 1}
if ($flag == 1){&error("メールアドレスに不正な文字が含まれています")}
何このキモい文法
my $flag = 0;
$flag = 1 if $mailto =~ /\n|,/;
$flag = 1 if $email =~ /\n|,/;
$flag = 1 if $subject2 =~ /\n/;
error("メールアドレスに不正な文字が含まれています") if $flag;
少なくともこちらのほうが可読性が高いし
error("メールアドレスに不正な文字が含まれています") if $mailto =~ /\n|,/ or $email =~ /\n|,/ or $subject2 =~ /\n/;
でスッキリする。
TIMTOWDIつっても限度あるぞゴラァ