Moin Moin,
langsam verzweifle ich an meinen Perl-Kenntnissen ;) Also folgendes Problem: Ich habe ein Skript, welches Log-Dateien ausliest und nach bestimmten Wörtern durchsucht. Sollte darin ein kritischer Wert enthalten sein, soll eine Mail versendet werden.Darf leider nicht das ganze Skript reinstellen, also nur einen Ausschnitt
opendir(DIR, $TempDir);
@File = readdir(DIR);
closedir(DIR);# filter items beginning with "s" foreach(@File) {
if($_ =~ /^s/ ) {
$Bla[$Counter] = $_;
$Counter++;
}
}
#analyze the log-files: open files from array "Bla", write content to array "Temp"
foreach(@Bla) {
open(FH ,"<$_") or die "Cannot open $_";
@Temp = <FH>;
close(FH);
Danach erfolgt dann der Mailversand etc. Das Skript funktioniert tadellos wenn man es über die Bash aufruft... wunderbar!
Aber sobald ich das PerlSkript per crontab aufrufe kommt es zu folgender Fehlermeldung:Cannot open s*****.log at analyze.pl line 46
Line 46 ist:
open(FH ,"<$_") or die "Cannot open $_";
Irgendwelche Ideen??
Datum: 05.02.2008-15:09
readline() on closed FileHandle im Crontab-Log
