[Vienna-pm] use strict => Geltungsbereich?

Baier Oliver INT SD BaierO at spardat.at
Fri Mar 28 05:54:49 CST 2003


Hi,

habe mit Namespaces bzw. Packages bisher noch nichts zu tun
gehabt und stehe nun vor einem kleinen Problem.

Ich will, wenn @ARGV definiert ist, eine andere Variable
($db_count) definieren, die natuerlich im Hauptprogramm
sichtbar ist. Da ich "use strict" verwende und somit alle
vars definieren muss, kann ich die Variable nicht mit my
deklarieren, da sie sonst ausserhalb des if-Blocks nicht
sichtbar ist aber auch nicht mit $::db_count, da ich sie
sonst im Hauptprogramm erst wieder importieren muesste,
was ich vermeiden will.

=> In welchem Geltungsbereich befinde ich mich nach "use strict"

Hier noch ein Code-Schnipsel, der folgenden Fehler produziert:
Variable "$db_count" is not imported at ./checkcache.pl line 34.

---------- snip ----------

use strict;

if (defined @ARGV && $ARGV[0] eq '-c') {
    $::db_count = 0;
    ...
    ...
}

print "passt\n" if defined $db_count;

---------- snip ----------

mfg
Oliver



More information about the Vienna-pm mailing list