source: vendor/perl/5.8.8/plan9/aperl@ 3181

Last change on this file since 3181 was 3181, checked in by bird, 18 years ago

perl 5.8.8

File size: 229 bytes
Line 
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
7/bin/perl $* |[2] /bin/perl -pe 's/ line (\d+)/:$1/' >[1=2]
Note: See TracBrowser for help on using the repository browser.