BEGIN是 Perl 在程式開始和結束時執行的五個程式碼塊之一。它建立了在 Perl 直譯器啟動後立即執行的塊。在一個檔案中或一個BEGIN塊中可能存在多個eval'd 字串，它們按定義順序執行。
儘管它可以以sub為字首，但這不被認為是良好的程式設計習慣，因為這些塊不是子程式。
BEGIN BLOCK
