summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/perl/plan9/aperl
blob: 4d032e3c3d77168ac87b57529005e4a80f5fd47b (plain)
1
2
3
4
5
6
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]