1 files changed, 7 insertions, 0 deletions
diff --git a/acme/bin/Perl b/acme/bin/Perl
new file mode 100755
index 000000000..c3544bcb6
--- /dev/null
+++ b/acme/bin/Perl
@@ -0,0 +1,7 @@
+#!/bin/rc
+
+# aperl:   
+# Executes perl command and alters stderr to produce Acme-friendly error messages
+# Created 02-JUL-1996, Luther Huffman,  lutherh@stratcom.com
+
+/bin/perl $* |[2]  /bin/perl -pe 's/ line (\d+)/:$1 /'  >[1=2]