Exportovani prom.?

[Honza Pazdziora]

> Mohl by mi nekdo poradit, jak exportovat z modulu promenne a nastavit pritom
> jejich pocatecni hodnotu? Ja je exportuju pres EXPORT v Exporterovi, ale
> ztraci se mi jejich hodnota, kterou definuji v:
> 
> BEGIN {
> my ($prom1,$prom2) = ('hod1','hod2');
> }

Neni mozno exportovat do namespacu lexikalni promenne, je mozno
exportovat pouze globalni promenne. Navic, exportovanim se vytvari
alias na zaznam v tabulce jmen, takze v tom vnejsim modulu je videt
aktualni hodnota, neni potreba sachovat s BEGIN. Melo by stacit
(netestovano):

	package MyModule;
	use strict;
	use Exporter;
	use vars qw! $VERSION @ISA @EXPORT $prom1 $prom2 !;
	@ISA = qw! Exporter !;
	@EXPORT = ! $prom1 $prom2 !;

	[...]

	$prom1 = 'jezek';

Doufam, ze to pomuze,

------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
 make vmlinux.exe			-- SGI Visual Workstation Howto
------------------------------------------------------------------------