Hi,

My objective is to get the line number of the first occurance of the search pattern.


my test.txt contains:

..... ..................
total rows....
................... ..
total rejected rows: 40
total rejected rows: 50
total rejected rows: 80
total rejected rows: 90

total discarded rows: 40
................. ..
................. ..
................. ..

i want to get the line number of first occurance of "total rejected rows:" and the value next to it that is 40 in this case.
i beleive the awk command in this program returns the last value of the line.



these are the errors i got while executing this program:
Errors:

String found where operator expected at search2.pl line 19, near "awk '{print NF ":" $0}'"
(Do you need to predeclare awk?)
syntax error at search2.pl line 19, near "awk '{print NF ":" $0}'"
Execution of search2.pl aborted due to compilation errors.

can somebody help me with this?

thanks,

Mercury.

[Code = Perl]

#!/usr/bin/perl

use strict;
use warnings;
sub search_pattern
{

my $file_name = $_[0];

my $search = $_[1];
open(LOGFILE, $_[0]) or die("Error: cannot open file '$_[0]'\n");



while (<LOGFILE>) {
chomp($_);

if (/$search/) {
awk '{print NF ":" $0}' #Value of the last field
print "\n$." # prints the line number
}
}
}

my $file_n ="test.txt";

my $search_p = "total rejected rows:";

&search_pattern($file_n, $search_p);


[/code]