这篇文章给大家介绍Perl中BEGIN和END如何使用,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。
关于Perl语言中BEGIN和END的使用
Perl语言学习者必须关注…很强实用性。
有些时候我们需要在Perl业务代码开始执行之前做一些初始化工作,或者在结束的时候做一些收尾的工作,Perl语言提供了这样的块BEGIN和END帮助Perl程序员实现这些操作。
下面我先看一个简单的例子做为BEGIN和END功能的解释:
0.#!use/bin/Perl 1.print"pid=$$\n"; 2.print"pname=$0\n"; 3.print"Startmainrunninghere\n"; 4.BEGIN{print"BEGIN\n";} 5.END{print"END\n";}
上边的代码很简单,我们来具体的分析一下:
0.不用多说,是命令行; 1.打印出当前进程的进程号; 2.打印出当前Perl程序的完整名称(包含路径); 3.打印“Startmainrunninghere”,并换行; 4.BEGIN{}块,打印“BEGIN”,并换行,标记BEGIN块的执行顺序; 5.END{}块,打印“END”,并换行,标记END执行的顺序。
代码运行的结果:
BEGIN pid=2664 pname=F:/PerlTemp/PerlTemp1/Demo1.pl Startmainrunninghere END
根据结果,我们得出,BEGIN是在Perl语言运行最开始运行的块,END是在Perl语言运行***运行的块,并注意BEGIN和END必须是大写的。
关于Perl中BEGIN和END如何使用就分享到这里了,希望以上内容可以对大家有一定的帮助,可以学到更多知识。如果觉得文章不错,可以把它分享出去让更多的人看到。
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。