sysopen my $fh, $file, O_RDONLY|O_NDELAY;
close $fh;