Re: Perl one-liner to print columns



On 4/25/05, Jay Savage <daggerquill@xxxxxxxxx> wrote:
> On 4/25/05, Larsen, Errin M HMMA/IT <errinlarsen@xxxxxxxxxxx> wrote:
> > Hi Perlers,
> >
> > I typically will type the following to collect a specific column of
> > data from some command's output:
> >
> > # some_command | awk '{print $4}'
> >
> > I wanted to start using perl one-liners more often, so I thought I'd
> > try the column thing first. This is what I came up with:
> >
> > # some_command | perl -pe '$_ = (split)[3] . "\n";'
> >
> > That feels/seems rather awkward. Is there an easier, "cleaner" way of
> > doing this?
> >
> > --Errin
>
> perl -pae '$_="$F[3]\n"'
> perl -nae 'print "$F[3]\n"'
>
> See perldoc perlrun for info on the -a and -F switches.
>
> HTH,
>
> --jay
>

Also, I feel like I should mention:

perl -lnae 'print $F[3]' #and
perl -lpae '$_ = $F[3]'

Which are more awkish and arguably less typing, but be careful with
the -0 switch when using them. Again, perldoc perlrun covers the
details.

Best,

--jay
.



Relevant Pages

  • Re: Perl one-liner to print columns
    ... See perldoc perlrun for info on the -a and -F switches. ... HTH, ... Prev by Date: ...
    (perl.beginners)
  • Re: golf
    ... See `perldoc perlrun` and search for 'Command Switches'. ... Just my 0.00000002 million dollars worth, ...
    (perl.beginners)