From 85382df59cbd04fe337fdd6a02075b3def330a78 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 24 Sep 2020 15:35:00 -0700
Subject: [PATCH] cleanup files on exit

---
 t/snippets/perltidy_random_run.pl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/t/snippets/perltidy_random_run.pl b/t/snippets/perltidy_random_run.pl
index 9adeb6f5..9d61768a 100755
--- a/t/snippets/perltidy_random_run.pl
+++ b/t/snippets/perltidy_random_run.pl
@@ -447,6 +447,13 @@ for (my $nf=$nf_beg; $nf<=$nf_end; $nf++) {
     }  ## end inner loop over profiles
 }  ## end outer loop over files
 
+if (@saved_for_deletion) {
+    foreach (@saved_for_deletion) {
+        unlink $_ if ( -e $_ );
+    }
+    @saved_for_deletion = ();
+}
+
 # Summarize results..
 if (@problems) {
     print STDERR <<EOM;
-- 
2.39.5