perl 作为一种脚本语言可以实时地生成和执行代码。这种特性可以把代码的编译推迟到运行时,所以又称为“动态代码”。另外, perl 也如 java 、 c++ 一样提供了异常处理机制。本文将初步探讨perl 中实现动态代码和异常处理机制的函数: eval 。如有错误不足,欢迎讨论和批评指正。
eval 函数可以看作是 perl 虚拟机,它的参数就是一段 perl 代码。利用 'perldoc –f eval'可以获取 eval 函数使用帮助,其中介绍了它的两种使用方式:
expr 是一个的表达式,例如:
在执行时, perl 解释器会首先解析表达式的值,然后将表达式值作为一条 perl 语句插入当前执行上下文。所以,新生成的语句与 eval 语句本身具有相同的上下文环境。这种方式中,每次执行eval 语句,表达式都会被解析。所以,如果 eval expr 如果出现在循环中,表达式可能会被解析多次。 eval 的这种方式使得 perl 脚本程序能实时生成和执行代码,从而实现了“动态代码”。
block 是一个代码块,例如:
与第一种方式不同, block 只会被解析一次,然后整个插入当前 eval 函数所在的执行上下文。由于解析上的性能的优势,以及可以在编译时进行代码语法检查,这种方式通常被作为 perl 用来为一段代码提供异常捕捉机制,虽然前一种方式也可以。
按帮助的名称,称 eval 的参数程序为“小程序” (mini-program) 。在两种方式中, eval 函数的返回值都是小程序的最后一条语句的值,如果遇到 return 语句,与子例程相同。
script1:
output:
如果小程序中有语法错误、运行时错误遇到 die 语句, eval 将返回 undef 。错误码被保存在$@ 中。
script2:
output:
script3:
output:
发表评论