hallo.ich binde so meine module für mein script ein:
opendir (MODULE, "module") || info("kann moduldir nicht öffnen: $! -- benutze nur main()");
while (my $datei = readdir MODULE) {
next unless $datei =~ /\.cgi$/;
require "module/$datei" || &logge("! kann modul nicht einbinden: $!", "main");
push(@module, $datei);
$i++;
}
closedir (MODULE);
am anfang jeder modul datei steht
our $<modulname>_version
nun will ich in dem main script auf jede dieser $<modulname>_version variablen zugreifen - dynamisch. dazu verarbeite ich @module wie folgend:
foreach my $modulname(@module){
my ($mod_name) = split(/\./,$modulname);
push(@module_formatiert,"* $mod_name - v.$mod_name_version<br>");
}
allerdings funzt es so nicht. irgendwas is bei $mod_name_version falsch.
kann mir einer helfen, bzw weiss es besser?vielen dank für eure hilfe
mfg chris
Datum: 20.12.2004-23:00
