Christian: Globale Variablen auslagern

Beitrag lesen

Hallo,

ich habe mehrere Skripte, die dieselben Variablen benutzen. Also moechte ich die auslagern, damit Aenderungen einfach bleiben.

Eine Loesung, die ich gefunden habe ist folgende:

---- default.cfg ----

Globale Variablen

$var1 = 'bla';
$var2 = 'blubb';

----- skript.pl -----

Hauptskript

/usr/bin/perl -w
use strict;
{ package Config; do 'default.cfg'; }
print "Variable1: ".$Config::var1;

Das funktioniert auch wunderbar, nur leider bekomme ich immer eine Warnung, wenn ich meine Variable nur einmal benoetige:
Name "Config::var1" used only once: possible typo at ...
Das ist zwar nur eine Warnung, aber sie stoert mich.
Wie kann ich diese Fehlermeldung vermeiden? (Natuerlich ohne auf "-w" zu verzichten :-) )

Gruessle
Christian