Replaced 'unlink' with 'unlink_all' in t/op/goto.t

diff --git a/t/op/goto.t b/t/op/goto.t
index 12bade9..4de47ef 100644 (file)
--- a/t/op/goto.t
+++ b/t/op/goto.t
@@ -231,7 +231,7 @@ close $f;
 
 $r = runperl(prog => 'use Op_goto01; print qq[DONE\n]');
 is($r, "OK\nDONE\n", "goto within use-d file"); 
-unlink "Op_goto01.pm";
+unlink_all "Op_goto01.pm";
 
 # test for [perl #24108]
 $ok = 1;