Podivnost pri use vars

[Pavel Šmerk]

Zdravim,

$ cat pokus.pl
#!/usr/bin/perl -w
use strict;
my @vars = qw($pokus);
use vars @vars;
$pokus = "ahoj\n";

$ perl -c pokus.pl
Global symbol "pokus" requires explicit package name at pokus.pl line 5.

pokus.pl had compilation errors.

Proc nelze pouzit use vars @nejaky_seznam?

Diky

P.