eval{}; 中のreturn(); に注意
- 2009.04.08
- perl
例えば
sub xxx{
eval{
my $a=1;
if($a){return(0);}
};
}if(&xxx){print"abc";}
else{print"def";}
などとするとうまくいかない。
sub xxx{
eval{
my $a=1;
if($a){die;}
};
if($@){return(0);}
}
などとしよう。
-
前の記事
配列をプリントする時の区切り文字を変える 2009.03.30
-
次の記事
DBIでMysql を使う時の文字コード指定 2009.04.11