das geht viel einfacher, als Du denkst:
sub constructor1 ()
{
$bla = "2nd line\n";
return $bla;
}open (FILE, ">",$filename);
print FILE "1st line\n";
print FILE constructor1();
close (FILE);
OK, das ist natürlich eine brauchbare, einfache Lösung :)
Aber rein in der Theorie... ist es dann überhaupt möglich Filehandles zu übergeben?
Danke!