实例解析Perl语言中BEGIN和END用法

本文和大家重点学习一下Perl语言中BEGIN和END用法，Perl语言提供了两个关键字：BEGIN，END。它们可以分别包含一组脚本，用于程序体运行前或者运行后的执行。

Perl语言中BEGIN和END用法解析

Perl语言提供了两个关键字：BEGIN，END。它们可以分别包含一组脚本，用于程序体运行前或者运行后的执行，听起来很坳口是不是？下面看三个例子就明白了！

***个例子：最简单，最直接的！#!/usr/bin/Perl

 
 
 

  
  
  
BEGIN{  
  
  
  
 
  
  
  
print"inBEGINmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
  
  
  
die"exitPerlprogram!\n";  
  
  
  
 
  
  
  
END{  
  
  
  
 
  
  
  
print"inENDmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
 
 
 

复制代码执行结果：

inBEGINmodule!

exitPerlprogram!

inENDmodule!
复制代码是不是很好理解？！

第二个例子：主程序体放在BEGIN／END前面；#!/usr/bin/Perl

 
 
 

  
  
  
die"exitPerlprogram!\n";  
  
  
  
 
  
  
  
BEGIN{  
  
  
  
 
  
  
  
print"inBEGINmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
  
  
  
END{  
  
  
  
 
  
  
  
print"inENDmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
 
 
 

复制代码结果：

inBEGINmodule!

exitPerlprogram!

inENDmodule!
复制代码***一种，想必大家都能想到的：#!/usr/bin/Perl

 
 
 

  
  
  
BEGIN{  
  
  
  
 
  
  
  
print"inBEGINmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
  
  
  
END{  
  
  
  
 
  
  
  
print"inENDmodule!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
  
  
  
die"exitPerlprogram!\n";  
  
  
  
 
 
 
 

复制代码结果还是一样，这里我就不贴了。

总之，Perl语言中BEGIN／END模块和所在位置无关！

本文标题：实例解析Perl语言中BEGIN和END用法
标题路径：http://www.csdahua.cn/qtweb/news28/473378.html

网站建设、网络推广公司-快上网，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

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