diff options
| -rw-r--r-- | t/op/goto.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/goto.t b/t/op/goto.t index 12bade9b13..4de47efa5a 100644 --- 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; |