Filehandler an Unterfunktion übergeben?

[Markus Thomas]

Hallo,

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);

Gruß Markus