UNIX for Advanced & Expert Users

Hello All,

I am not familiar with the perl and awk syntax :-(.

Thanks a lot! It worked as expected !

Regards.

try google


The example I posted:

Code:

 perl -nle '{print $_ if scalar(@_ = $_ =~ /pattern/g) == 2}' infile

Code:

perl -nle 'expression' infile

loop over the file 'infile' and execute 'expression' on each line

Code:

$_ =~ /pattern/g

Bind to the current line ($_) and search for all occurences of pattern on that line. By default, this operation will work on $_ so that could have been omitted and this part could have been specified as /pattern/g.

Code:

@_ = $_ =~ /pattern/g

In list context, m//g, or simply //g, returns all of the matched occurrences of pattern. So @_ will be a list containing however many occurrences of the pattern existed.

Code:

scalar(@_ = ... )

Take the list @_ and tell me how many items it contains.

Code:

if scalar(...) == 2

Check to see if it contains 2 items (occurrences of pattern).

Code:

print $_ if scalar(...) == 2

Print the current line from the file if it contains exactly 2 occurrences of the search pattern.... which is what I thought you wanted.

Thanks Vi-Curious,

Yes. Will google and learn more :-)

Thanks for the detailed explanation!

Regards.