始める {…}; Perlでは？

閉鎖。 この質問はトピックから外れています。現在、回答を受け付けていません。

この質問を改善したいですか？ 質問を更新して、UnixおよびLinuxStackExchangeのトピックになります。

2年前に閉鎖されました。

この質問を改善する

私はperlスクリプトを持っています：

#!/usr/bin/perl 

BEGIN {
        print "That's BEGIN message\n";
BEGIN { print "That's BEGIN-2 message\n"; };
END { print "That's END message\n"; };
BEGIN { print "That's BEGIN-3 message\n"; };
};

それはそう機能します：

That's BEGIN-2 message
That's BEGIN-3 message
That's BEGIN message
That's END message

しかし、なぜ？ 1行目に印刷する必要がありますThat's BEGIN message またはいいえ？

承認された回答：

最初のBEGIN 完全に実行されるまで実行されません 定義済み（ドキュメントを参照）。それは最後の}の終わりまで起こりません 。

他のものは、完全に定義されたとおりに実行されます—以前に。