美图齐众专注资阳网站设计 资阳网站制作 资阳网站建设
资阳网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

实例解析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用法
文章URL:http://www.zsjierui.cn/article/codhjjp.html

其他资讯