From 279bf05763e98052960c2b61c0798b4d138ea73e Mon Sep 17 00:00:00 2001
From: Michael Mikonos <127171689+mknos@users.noreply.github.com>
Date: Fri, 29 Mar 2024 00:21:29 +0800
Subject: [PATCH] awk: remove temporary files (#525)

* awk wrapper doesn't clean up after itself and I am left with all these spam files...
a2pin.6695 a2pout.6695 a2pin.6697 a2pout.6697 a2pin.6699 a2pout.6699 a2pin.6702 a2pout.6702 a2pin.6951 a2pout.6951 a2pin.6953 a2pout.6953

* unlink before exit is better, whether or not the files are written in /tmp
---
 bin/awk | 1 +
 1 file changed, 1 insertion(+)

diff --git a/bin/awk b/bin/awk
index a139b968..48f91bcf 100755
--- a/bin/awk
+++ b/bin/awk
@@ -131,6 +131,7 @@ if ($@) {
     die "Couldn't compile and execute awk-to-perl program: $@\n";
 }
 
+unlink $tmpin, $tmpout;
 exit 0;
 
 __END__