|
package XXX; use strict qw(vars); require Exporter; our @ISA = qw(Exporter); our @EXPORT = qw(...); $var1 = 17; # nicht (mehr) zulaessig, # falls $var1 noch nicht deklariert worden ist local $var2; # ist ebenfalls nicht (mehr) zulaessig my $var3; # ist zulaessig our $var4; # ist zulaessig $XXX::var5 = 1; # qualifizierte Verwendung ist zulaessig |
Bei der mit use strict qw(vars); erzwungenen
strikten Ordnung bei Variablennamen sind nur noch
qualifizierte oder mit my lokal deklarierte Variablennamen
zulässig.
| |
Dies erhöht gerade bei umfangreicheren Projekten
nicht nur die Lesbarkeit (durch die erzwungenen Deklarierungen
oder die qualifizierte Schreibweise), sondern vermeidet
(in gegenüber use warnings vermehrten Maße)
Probleme mit vertippten Variablennamen oder Fallen durch
dynamische Sichtbereiche (bei lokal).
|
Copyright © 1996 - 2003 Andreas Borchert, in HTML konvertiert am 01.10.2003 |