Don't open already-open files on Windows

[chaz/p5-File-KDBX] / t / hmac-block.t

diff --git a/t/hmac-block.t b/t/hmac-block.t
index 87f280913f0b863c1eef8a6ed1fb9441d01b2ea8..035d43319170dc90341d5f31fcf1e88b2d4bae8d 100644 (file)
--- a/t/hmac-block.t
+++ b/t/hmac-block.t
@@ -44,9 +44,9 @@ SKIP: {
         $write = File::KDBX::IO::HmacBlock->new($write, key => $KEY);
         print $write $expected_plaintext;
         close($write) or die "close failed: $!";
-        # exit;
-        require POSIX;
-        POSIX::_exit(0);
+        exit;
+        # require POSIX;
+        # POSIX::_exit(0);
     }
 
     $read = File::KDBX::IO::HmacBlock->new($read, key => $KEY);