[Chicago-talk] removing blank lined header
Leland Johnson
easyasy2k at gmail.com
Wed Sep 29 13:41:14 CDT 2004
That's pretty slick.
On Wed, 29 Sep 2004 14:20:56 -0400, Steven Lembark <lembark at wrkhors.com> wrote:
>
>
> -- Leland Johnson <easyasy2k at gmail.com>
>
> > perl -ne'BEGIN { $a = 0 } $a++ if(not /^$/); print if(!/^$/ or $a)'
> > clunky, but works.
>
> local $/;
> ( $a = <ARGV> ) =~ s/^\s+//s
>
>
>
>
> --
> Steven Lembark 85-09 90th Street
> Workhorse Computing Woodhaven, NY 11421
> lembark at wrkhors.com 1 888 359 3508
> _______________________________________________
> Chicago-talk mailing list
> Chicago-talk at mail.pm.org
> http://mail.pm.org/mailman/listinfo/chicago-talk
>
--
Leland Johnson
http://protoplasmic.org
More information about the Chicago-talk
mailing list