Hallo Zusammen,
ich möchte eine Textdatei auslesen, in der sich Perl-Code befindet und den Code dann ausführen lassen.
Die Text-Datei (datei.txt) beinhaltet z.B.:
Das ist ein Textdatei
$ENV{'REMOTE_HOST'}
...
Die einzelnen Records werden dann als Arrays/Strings eingelesen z.B.:
open(FILE, "<$datei")\n";
my $i=0;
while(<FILE>) {
$record[$i] = $_;
$i++;
}
close(FILE);
Für die Ausgabe der Zeile 1 und 2 ergäbe es dann:
print "$record[1]\n"; # Ergebnis: Das ist ein Textdatei
print "$record[2]\n"; # Ergebnis: $ENV{'REMOTE_ADDR'}
Leider wird die Umgebungsvariable nicht ausgeführt!
FRAGE: Wie bekomme ich es hin, dass der $record[2] nicht als String interpretiert, sondern als Variable ausgeführt wird und z.B.: 127.0.0.1 ausgegeben wird?
Danke und Gruß
Friedhelm