On 2010-07-10 15:00:52 +0300, zgrim wrote:
> On 2010-07-10 14:26:35 +0300, Adrian Sevcenco wrote:
> > Salut! incerc sa parsez un fisier cu un numar variabil de cimpuri pe
> > fiecare linie si sa printez totate cimpurile mai putin ultimele doua...
> > incerc sa fac asha :
> >
> > #! /bin/awk -f
> > BEGIN { FS = "-" }
> > {
> > for (i = 1; i <= (NF - 2) ; i++)
> > print $i
> > }
>
> (ha! new subversion opportunity!)
>
> perl -lane'$,=" "; print @F[0..$#F-2]' <file>
am vazut dupa ce-am trimis ca ai vrea field separator '-',
am omis sa mentionez ca poti specifica ce fs vrei cu -F:
perl -F- -lane '...'
--
perl -MLWP::Simple -e'print$_[rand(split(q.%%\n.,
get(q{http://cpan.org/misc/japh})))]'
_______________________________________________
RLUG mailing list
[email protected]
http://lists.lug.ro/mailman/listinfo/rlug