Globale variable: in packages nutzen? - #68055 (Allgemeines zu Perl)

styx-cc

2006-07-11 19:54

User since
2006-05-20
533 Artikel
BenutzerIn

user image

Hallo :-)
Ich hab nen kleines Problem, ich will eine globale Variable erzeugen, auf die ich auch in anderen Packages zugreifen kann.

Folgendes hab ich versucht:
main.pl:

Code: (dl )

#!/usr/bin/perl -w
use strict;

use foo;

our $test = "test";
print "main::   $test";
&foo::out();

Dann das Package:

Code: (dl )

1
2
3

package foo;
sub out {print "$test"};
1;

Vielen Dank im Voraus ..

MfG, stefan\n\n

Pörl.