最新消息:欢迎光临!

perl捕获异常

perl findever 1678浏览 0评论
eval {
open(FH,"domains.txt") or die "Can't open files,$!";
};
#捕获异常
if($@){
#出现异常
}
else{
#无异常,打印文件内容
while(<FH>){
...
}
close FH;
}

perl捕获异常,仅供参考,可以扩展…

####打开文件句柄

eval {
open(FH,"domains.txt") or die "Can't open files,$!";
};
#捕获异常
if($@){
#出现异常
}
else{
#无异常,打印文件内容
while(<FH>){
...
}
close FH;
}

转载请注明:Findever » perl捕获异常

发表我的评论
取消评论

表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址