plan9/aperl

   1 #!/bin/rc
   2
   3 # aperl:
   4 # Executes perl command and alters stderr to produce Acme-friendly error messages
   5 # Created 02-JUL-1996, Luther Huffman,  lutherh@stratcom.com
   6 # Modified May 2020, David Romano, unobe@cpan.org
   7
   8 /bin/perl-_P9P_VERSION $* |[2]  /bin/perl-_P9P_VERSION -pe 's/ line (\d+)/:$1/'  >[1=2]