🚀 go-pugleaf

Waldek Grudzien <waldekg@uhc.lublin.pl> wrote:

:> Jednym z ograniczeń jakie wprowadza use strict, jest zakaz używania 
:> zmiennych globalnych, z wyjątkiem dwóch sytuacji - gdy taka zmienna 
:> jest zadeklarowana przez dyrektywę "use vars", lub gdy użyjemy pełnej
:> nazwy (wraz z nazwą pakietu). 

: No dobrze, ale czy można jakoś zmusić perl'a do działania tego mechanizmu
: również na skalarach ? 
: Przykładowo mamy skrypt :

: #!/usr/bin/perl
: use strict;
: my @b=("  "," \t ");
: print "\n",@b,"\n";
: print $a,",",$^O;

: Uruchomienie nie powoduje żadnego komunikatu błędu (mimo, że $a nie jest 
: zadeklarowane w ogóle). 

Ha, śmieszne :-)

Już wiem - co chodzi, perl się tak zachowuje wyłącznie dla zmiennych 
$a i $b - dla wszystkich innych zgłasza błąd:

Global symbol "c" requires explicit package name at ./zz line 12.

Jak przypuszczam, wynika to z tego że zmienne te są traktowane nieco
specjalnie, a mianowicie w funkcji sort wskazują na elementy do
porównania:

sort { $a <=> $b } @list;

Wniosek - nie używać zmiennych $a i $b :-)

-- 
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND