perl gästebuch und methoden

[tom021]

hi leute !

ich will ein gästebuch auf meiner website implementieren. dazu hab ich ein kleines script geschrieben. Die ausgabe der daten in die datei soll mittels einer methode geschehen. wichtig ist noch, dass ich use strict im script aufrufe.

hier kommt der code:


my sub printEntry {
print FH "\n\n\n";
print FH "<p><p>Name: ".$query[0]."\n";
print FH "<p>eMail: ".$query[1]."\n";
print FH "<p>Kommentar:<br>".$query[2]."\n";
print FH "</body></html>\n";
}


dabei erhalte ich immer den folgenden fehler des interpreters:

"my sub" not yet implemented at web.pl line 69.

leider weiss ich nicht was ich mit dieser ausgabe anfangen soll. als ich ohne methoden gearbeitet hatte lief das script einwandfrei. dafür hatte ich auch entsprechend spagetti code.

wäre nett wenn mir einer von euch helfen könnte

mfg
tom

[sagi]

Subroutinen werden ohne "my" deklariert.

mfg

c.

[tom021]

hi !

vielen dank. ich denke, das problem ist, dass ich an die methode einen filehandler übergeben möchte, was aber in perl scheinbar nicht funktioniert oder geht das doch ??

mfg
tom

[sagi]

sub test {
print { $_[0] } "line\n";
}


der Aufruf dann einfach:

test $fh;

mfg

c.