Hallo speedy,
if(open(LOGHANDLE,">$v->{logfile}"))
{
$v->{LOGHANDLE} = \*LOGHANDLE;
}
Soweit korrekt. Du könntest aber auch einfach
unless(open($v->{LOGHANDLE},'>'.$v->{logfile})) {
# fehlerbehandlung
}
schreiben ;)
Nun wollte ich in einer Subroutine per:
print *{$v->{LOGHANDLE}} "Irgendein Text";
print {$v->{LOGHANDLE}} "blahr\n";
Du musst dem Perl-Interpreter sagen, dass das zusammengehört. Das
versteht er in dem Kontext leider nicht.
Grüße,
CK
--
Ihr wisst nicht, wie man den Menschen dient. Wie sollt ihr wissen, wie man den Goettern muss soll?
Ihr wisst nicht, wie man den Menschen dient. Wie sollt ihr wissen, wie man den Goettern muss soll?