perl BEGIN和END用法

本文和大家重點學習一下Perl語言中BEGIN和END的使用，Perl能在絕大多數操作系統運行，可以方便地向不同操作系統遷移，希望本文的介紹能讓你有所收穫。

關於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必須是大寫的。