diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-07-26 03:53:27 +0000 |
|---|---|---|
| committer | Charles Bailey <bailey@genetics.upenn.edu> | 1996-07-26 03:53:27 +0000 |
| commit | 396e9e6f77853ce5b5bd54c151a15d6820deba3a (patch) | |
| tree | dec367aaa99df9194e1d594e7c4b0a15ea41157c /plan9/aperl | |
| parent | 62ac1c994e20a7298bfc84e40958ae6c95247bab (diff) | |
| download | perl-396e9e6f77853ce5b5bd54c151a15d6820deba3a.tar.gz | |
New Plan9 port
Diffstat (limited to 'plan9/aperl')
| -rw-r--r-- | plan9/aperl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/plan9/aperl b/plan9/aperl new file mode 100644 index 0000000000..4d032e3c3d --- /dev/null +++ b/plan9/aperl @@ -0,0 +1,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] |