<cut> > my @vars = qw($pokus); > use vars @vars; > > pokus.pl had compilation errors. <\cut> A co zkusit eval ?? Nevim, jenom takovej napad... JiK