What is the simplest way to print a field, as in $3 does in awk

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question: ⭐ (strings)

What is the simplest method in perl of achieving the following from awk?

awk '
  $2 ~ /localhost/ {
    print $0
  }
' /etc/hosts
[download]

Originally posted as a Categorized Question.

Comment on What is the simplest way to print a field, as in $3 does in awk Download Code

Replies are listed 'Best First'.
Re: What is the simplest way to print a field, as in $3 does in awk⭐ by jmcnamara (Monsignor) on Oct 23, 2001 at 15:46 UTC
Use the `-a` switch to autosplit to `@F`. `perl -lane 'print if $F[1] =~ /localhost/' /etc/hosts` [download] or `perl -lne 'print if /localhost/' /etc/hosts` -- John.	[reply] [d/l] [select]
Re: What is the simplest way to print a field, as in $3 does in awk⭐ by projekt21 (Friar) on Oct 23, 2001 at 15:47 UTC
`cat /etc/hosts \| perl -ne 'print if (split(/\s+/,$_))[1] =~ localhost'` [download]	[reply] [d/l]