plan9fox/acme/bin/Perl

8 lines
230 B
Plaintext
Raw Normal View History

2011-04-14 17:27:24 +00:00
#!/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]