Retract #13596, #13593 should do the trick.

p4raw-id: //depot/perl@13597

diff --git a/t/op/stat.t b/t/op/stat.t
index d915061..79f9e29 100755 (executable)
--- a/t/op/stat.t
+++ b/t/op/stat.t
@@ -309,11 +309,6 @@ SKIP: {
 ok(-T 'op/stat.t',      '-T');
 ok(! -B 'op/stat.t',    '!-B');
 
-# Its like this.  stat on Cygwin treats 'perl' to mean 'perl.exe'.  So
-# all the file test operators work that way except -B and -T which
-# has to actually open the file.  open doesn't do the .exe magic.
-$Perl .= $Config{_exe} if $Is_Cygwin and $Perl !~ /$Config{_exe}$/;
-
 ok(-B $Perl,      '-B');
 ok(! -T $Perl,    '!-T');