Was genau "geht" nicht?
Ich würde halt denken, dass beim Aufruf von new halt schon die Datei erzeugt wird. Was aber nicht geschieht.
Du kannst einer Subroutine geöffnete Filehandles als Referenz übergeben:
open HANDLE, '/dev/urandom' ...
sub foo {
my $handle = shift;
my $out;
print Dumper $handle;
read($handle, $out, 100);
print Dumper $out;
}foo(\*HANDLE);
...
[/code]
Was macht denn die Funktion?
Ich möchte auf jeden Fall ja etwas in die Datei schreiben.
Gruß
Frank