Was passiert bei der alternativen Deklaration von Strict-Pragmas in einem Perl-Skript?

Question

Ich bin neu in Perl und probiere einen Beispielcode für mein Projekt aus. Was passiert, wenn ich einen Code wie unten angegeben schreibe, um strict pragmas in perl zu aktivieren.

streng verwenden;

....... #Quellcode .......

keine strengen "vars";

....... #Quellcode

streng verwenden #Sind alle Strict-Pragmas bis zur nächsten Pragma-Definition aktiviert?

......#Quellcode

keine strengen "Subs"; #Nur subs strict pragma wird deaktiviert und andere ab hier aktiviert?

...........

Kann ich die Verwendung von Strict Pragma-Deklarationen zwischen Quellcode einbetten?

Answer 1

use strict ist lexikalisch skaliert, was bedeutet, dass es "bis zum Ende des einschließenden Blocks, der Datei oder des eval (je nachdem, was zuerst eintritt)" in Kraft bleibt.

Answer 2

Ich denke, dass es am besten ist, die Pragma-Änderungen mit scope zu isolieren:

use strict;

{
    no strict;
    local $foo = 1;
}

local $bar = 1;

Dies explodiert bei der Einstellung bar , aber nicht auf foo .

Answer 3

Von perldoc strict :

Wenn keine Importliste angegeben wird, werden alle möglichen Einschränkungen angenommen.

Sie können die zu beachtenden Punkte ("subs", "vars" und "refs") jederzeit ändern.