my $filehandle=\*DATA;
funktion($filehandle);