Typo in t/op/stat.t

Message-ID: <lr64vcfv4t.fsf@caliper.activestate.com>

p4raw-id: //depot/perl@25144

diff --git a/t/op/stat.t b/t/op/stat.t
index 70ab5a3..b7004b7 100755 (executable)
--- a/t/op/stat.t
+++ b/t/op/stat.t
@@ -462,7 +462,7 @@ ok(unlink($f), 'unlink tmp file');
     -T _;
     my $s2 = -s _;
     is($s1, $s2, q(-T _ doesn't break the statbuffer));
-    unlink $file;
+    unlink $tmpfile;
 }
 
 END {