Začít {…}; V Perlu?

Zavřeno. Tato otázka je mimo téma. Momentálně nepřijímá odpovědi.

Chcete zlepšit tuto otázku? Aktualizujte otázku, aby byla aktuální pro Unix a Linux Stack Exchange.

Zavřeno před 2 lety.

Vylepšete tuto otázku

Mám perl-script:

#!/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"; };
};

Funguje to takto:

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

Ale proč? Musí se vytisknout na řádku 1 That's BEGIN message nebo ne?

Přijatá odpověď:

První BEGIN se nespustí, dokud není úplně definované (viz dokumentace). To se nestane až do konce posledního } .

Ostatní budou spuštěny tak, jak jsou zcela definovány – dříve.