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

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

Perl语言中BEGIN和END用法解析

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

***个例子:最简单,最直接的!#!/usr/bin/Perl

 
 
 
  1. BEGIN{  
  2.  
  3. print"inBEGINmodule!\n";  
  4.  
  5. }  
  6.  
  7. die"exitPerlprogram!\n";  
  8.  
  9. END{  
  10.  
  11. print"inENDmodule!\n";  
  12.  
  13. }  
  14.  

复制代码执行结果:

inBEGINmodule!

exitPerlprogram!

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

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

 
 
 
  1. die"exitPerlprogram!\n";  
  2.  
  3. BEGIN{  
  4.  
  5. print"inBEGINmodule!\n";  
  6.  
  7. }  
  8.  
  9. END{  
  10.  
  11. print"inENDmodule!\n";  
  12.  
  13. }  
  14.  

复制代码结果:

inBEGINmodule!

exitPerlprogram!

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

 
 
 
  1. BEGIN{  
  2.  
  3. print"inBEGINmodule!\n";  
  4.  
  5. }  
  6.  
  7. END{  
  8.  
  9. print"inENDmodule!\n";  
  10.  
  11. }  
  12.  
  13. die"exitPerlprogram!\n";  
  14.  

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

总之,Perl语言中BEGIN/END模块和所在位置无关!

分享标题:实例解析Perl语言中BEGIN和END用法
网站路径:http://www.shufengxianlan.com/qtweb/news28/473378.html

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

广告

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