Perleval函数的两种使用方式

本文和大家重点讨论一下Perl Perl eval函数的概念,Perl eval函数可以看作是Perl虚拟机,它的参数就是一段Perl代码,并且利用’Perldoc–feval’可以获取Perl eval函数使用帮助。具体内容请看本文详细介绍。

站在用户的角度思考问题,与客户深入沟通,找到峨边彝族网站设计与峨边彝族网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:网站制作、网站建设、企业官网、英文网站、手机端网站、网站推广、域名与空间、虚拟主机、企业邮箱。业务覆盖峨边彝族地区。

Perl eval函数探讨

Perl作为一种脚本语言可以实时地生成和执行代码。这种特性可以把代码的编译推迟到运行时,所以又称为“动态代码”。另外,Perl也如Java、C++一样提供了异常处理机制。本文将初步探讨Perl中实现动态代码和异常处理机制的函数:eval。如有错误不足,欢迎讨论和批评指正。

Perl eval函数可以看作是Perl虚拟机,它的参数就是一段Perl代码。利用’Perldoc–feval’可以获取Perl eval函数使用帮助,其中介绍了它的两种使用方式:

Perl eval函数之levalEXPR
EXPR是一个的表达式,例如:
eval"print$a";
eval'print$a'.',$b';
eval1+3;
eval'print'.'$a+$b,"\n"';
eval$command;#$command=‘print“helloPerl”’
eval$ARGV[0];
在执行时,Perl解释器会首先解析表达式的值,然后将表达式值作为一条Perl语句插入当前执行上下文。所以,新生成的语句与eval语句本身具有相同的上下文环境。这种方式中,每次执行eval语句,表达式都会被解析。所以,如果evalEXPR如果出现在循环中,表达式可能会被解析多次。eval的这种方式使得Perl脚本程序能实时生成和执行代码,从而实现了“动态代码”。

Perl eval函数之levalBLOCK
BLOCK是一个代码块,例如:
eval{print$a};
eval{$a=1,$b=2,$c=$a+$b};
与第一种方式不同,BLOCK只会被解析一次,然后整个插入当前Perl eval函数所在的执行上下文。由于解析上的性能的优势,以及可以在编译时进行代码语法检查,这种方式通常被作为Perl用来为一段代码提供异常捕捉机制,虽然前一种方式也可以。

按帮助的名称,称eval的参数程序为“小程序”(mini-program)。在两种方式中,Perl eval函数的返回值都是小程序的最后一条语句的值,如果遇到return语句,与子例程相同。
Script1: 

 
 
 
  1. #!/usr/bin/Perl-w  
  2.  
  3. push(@program,'$i=1;');  
  4. push(@program,'$i=3;$j=2;$k=$i+$j');  
  5. push(@program,'$i=3;return24;$k=$i+$j');  
  6.  
  7. foreach$exp(@program)  
  8. {  
  9. $rtn=eval($exp);  
  10. print$rtn,"\n";  
  11. }  
  12. Output:  
  13. 1  
  14. 5  
  15. 24 

 如果小程序中有语法错误、运行时错误遇到die语句,eval将返回undef。错误码被保存在$@中。
Script2: 

 
 
 
  1. #!/usr/bin/Perl-w  
  2.  
  3. push(@program,'$i=3;die"errormessage";$k=$i+$j');  
  4.  
  5. foreach$exp(@program)  
  6. {  
  7. $rtn=eval($exp);  
  8. if(!defined($rtn))  
  9. {  
  10. print"Exception:",$@,"\n";  
  11. }  
  12. else  
  13. {  
  14. print$rtn,"\n";  
  15. }  
  16. };  

 Output:
Exception:errormessageat(eval1)line1.

Script3: 

 
 
 
  1. #!/usr/bin/Perl-w  
  2.  
  3. #arun-timeerror  
  4. eval'$answer=';#sets$@  
  5. warn$@if$@;  
  6.  
  7. Output:  
  8. syntaxerrorat(eval1)line2,atEOF  

分享标题:Perleval函数的两种使用方式
网站网址:http://www.shufengxianlan.com/qtweb/news38/288838.html

网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联