require findet Datei nicht - #123352 (Allgemeines zu Perl)

Gast script im Urlaub

2009-07-18 17:38

Ich will mit einem variablen Pfad-Bestandteil ($sitenick) mehrere Dateien (.pl mit Konfigurationsdaten) einlesen.
Will aber nicht! Habe schon reichlich Pfadvarianten bis hin zum vollen Pfad ab Root oder webroot probiert.
Code-Ausschnitt:

Code (perl): (dl )

my $sitenick = 'aikxdc';
my  @Configs = qw(config.pl mysql.pl meta.pl upload.pl markup.pl);
for my $cfg (@Configs)
        {
        $cfg = "config/" . $sitenick . "/" . $cfg . "; ";
        eval {  require $cfg };
        if ( $@ ){ die "Can't load $cfg: $@"; } else { print "Hallo!"; }
        }

Code: (dl )

/global
	test.pl
	/config
		/aikxdc
			config.pl
			meta.pl
			mysql.pl

Fehlermeldung:

Code: (dl )

/Users/..../global/test.pl:6:  
Can't load config/aikxdc/config.pl; : 
Can't locate config/aikxdc/config.pl;  
in @INC (@INC contains: /Users/..../global /Library/Perl/... usw )

Schönen Gruß aus dem Urlaub!