Programmieren mit Perl

use vars

use vars qw($frobbed @munge %seen);

Dieses Pragma, das früher zur Deklaration globaler Variablen verwendet wurde, gilt heute als ein wenig veraltet. Heutzutage wird der Modifier our bevorzugt. Die vorige Deklaration ist wie folgt besser zu erreichen:

our($frobbed, @munge, %seen);

Auch das ist möglich:

our $frobbed = "F";
our @munge = "A" .. $frobbed;
our %seen = ();

Unabhängig davon, welche Lösung Sie wählen, müssen Sie daran denken, daß es sich um Variablen handelt, die innerhalb des Pakets global sind, nicht um lexikalische Variablen, die auf Dateien beschränkt sind.