perl语言 两个关键字：BEGIN， END 介绍

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

第一个例子：最简单，最直接的！

1. #!/usr/bin/perl
3. BEGIN {
4.     print "in BEGIN module!/n";
5. }
7. die "exit perl program!/n";
9. END {
10.     print "in END module!/n";
11. }

执行结果：

1. in BEGIN module!
2. exit perl program!
3. in END module!

是不是很好理解？！

第二个例子：主程序体放在BEGIN／END前面；

1. #!/usr/bin/perl
3. die "exit perl program!/n";
5. BEGIN {
6.     print "in BEGIN module!/n";
7. }
9. END {
10.     print "in END module!/n";
11. }

结果：

1. in BEGIN module!
2. exit perl program!
3. in END module!

最后一种，想必大家都能想到的：

1. #!/usr/bin/perl
3. BEGIN {
4.     print "in BEGIN module!/n";
5. }
7. END {
8.     print "in END module!/n";
9. }
11. die "exit perl program!/n";

结果还是一样，这里我就不贴了。总之，BEGIN／END模块和所在位置无关！