Byebye, beebee.

p4raw-id: //depot/perl@15725

diff --git a/t/lib/warnings/perlio b/t/lib/warnings/perlio
index 85aa5f2..7be0219 100644 (file)
--- a/t/lib/warnings/perlio
+++ b/t/lib/warnings/perlio
@@ -50,5 +50,6 @@ no warnings 'layer';
 open(F, ">:xyz", "bb");
 use warnings 'layer';
 open(F, ">:xyz", "bb");
+END { 1 while unlink "bb" } # KEEP THIS WITH THE LAST TEST.
 EXPECT
 perlio: unknown layer "xyz".