sysopen (OUT,"./text.txt", O_WRONLY|O_CREAT, 0600) or die "can not creat wegen $!\n";