perl捕获异常

发布时间：2020-12-16 00:05:31 所属栏目：大数据来源：网络整理

导读：来源：http://www.voidcn.com/article/p-qvzostkg-bba.html perl捕获异常，仅供参考，可以扩展... ####打开文件句柄 ? eval { ??? open(FH,"domains.txt") or die "Can't open files,$!"; ??? }; #捕获异常 ? if($@){ ??? #出现异常 ? } ? else{ ????? #无异

来源：http://www.voidcn.com/article/p-qvzostkg-bba.html

perl捕获异常，仅供参考，可以扩展...

####打开文件句柄
? eval {
??? open(FH,"domains.txt") or die "Can't open files,$!";
??? };

#捕获异常
? if($@){
??? #出现异常
? }
? else{

????? #无异常，打印文件内容
????? while(<FH>){
?????????? ...
?????? }
??? close FH;
?? }

如果eval块中的程序有语法错误、运行时错误或者遇到die语句，eval将返回undef。错误码被保存在$@中

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!