This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Avoid leaving a VAR.txt after testing terminates on any platform where
authorNicholas Clark <nick@ccl4.org>
Wed, 29 Oct 2008 19:34:05 +0000 (19:34 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 29 Oct 2008 19:34:05 +0000 (19:34 +0000)
commitcb1ea1622d4ada2138a66363f92a63d6d66fab96
treec397bdb11d5f3aa9dcccdfaa18089483d082e2fa
parent5254b38efe447cab6b380b613825d484abf7a3f2
Avoid leaving a VAR.txt after testing terminates on any platform where
you can't unlink an open file by instead opening $^X for read to get a
file handle for test purposes.

p4raw-id: //depot/perl@34639
ext/XS/APItest/t/svpeek.t