Variablen aus Externen Dateien

[jc]

Hallo,

ich habe schon viel darüber gelesen, aber bei mir klappt es einfach nicht.
Wie kann ich aus einer externen Datei, z.B. vars.pl, Variablen einlesen und in meinem Hauptprogramm nutzen?

index.pl
----------------------------------------------
#!/usr/bin/perl -w

use strict;

do "vars.pl";

print $test;
----------------------------------------------

vars.pl
----------------------------------------------
my $test = "TEST";
----------------------------------------------

Bei mir kommt jedesmal die Meldung "Global symbol "$test" requires explicit package name"

Ich habe auch schon use und require ausprobiert, aber ohne Erfolg :(
Weiß jemand Rat?

cu
jc