print if // line number?

I am wondering how to write the awk one liner :

cat <filename> | awk '$2 ~ /GRHL3/{print NR"\t"$0}'

which prints out the( or any) line that has the string "GRHL3" in it as well as its respective line number

the perl one liner for the same task I have so far is perl -ne 'print if /GRHL3/' <filename>

What do I have to add so that it will also print out the line number ... I feel like $. has to go somewhere? Thanks so much!! Also does someone know of a good web resource where you can look this sort of thing up (specifically about one liners).

Comment on print if // line number? Select or Download Code
Re: print if // line number? by kennethk (Monsignor) on Jun 07, 2011 at 22:43 UTC
awk's NR maps to Perl's $., so you should get your expected result with something like `perl -ne 'print "$.:\t$_" if /GRHL3/' <filename>`. My experience has been that the best general reference when you are trying to track down 'magic' behavior is usually perlvar.	[reply] [d/l]
Re: print if // line number? by toolic (Chancellor) on Jun 07, 2011 at 22:46 UTC
Also does someone know of a good web resource where you can look this sort of thing up (specifically about one liners). One Liners	[reply]
Re^2: print if // line number? by planetscape (Canon) on Jun 08, 2011 at 00:07 UTC
Also: Special Variables, Command-Line Options, and One-Liners HTH, planetscape	[reply]
Re: print if // line number? by ikegami (Pope) on Jun 07, 2011 at 23:08 UTC
What you said it does, in case that's what you want: `perl -ne'print "$.\t$_" if /GRHL3/'` [download] What it actually does (only the second field is checked for the pattern): `perl -ane'print "$.\t$_" if $F[1] =~ /GRHL3/'` [download] $. is in perlvar, and -n and -a are in perlrun.	[reply] [d/l] [select]
Re^2: print if // line number? by ZWcarp (Beadle) on Jun 08, 2011 at 00:52 UTC
Shoot you're right sorry...yeah I meant with out the $2 (specifying the field) ...just across the whole line	[reply]


Perl Monk, Perl Meditation
	PerlMonks

print if // line number?

The best material for plates (tableware) is: