shithub: riscv

ref: 5c6a03f4f417d00a6d169cfc9c7e6efae17f4e5e
dir: /acme/bin/Perl/

View raw version
#!/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]