SPUG:Best One-Liners and Scripts for UNIX
John W. Krahn
krahnj at acm.org
Thu Apr 17 03:11:43 CDT 2003
On Wednesday 16 April 2003 20:44, Brian Hatch wrote:
>
> Yeah, that's much longer than one line, but it could be reduced
> to this if you don't want to support alternate delimeters:
>
> function sp {
> $PERL5 -ape 'chomp @F; $_=join(" ",grep /./, @F['$fields'])."\n"' $@
That could be simplified to:
$PERL5 -lape'$_="@F['$fields']"' $@
:-)
John
--
use Perl;
program
fulfillment
More information about the spug-list
mailing list