How to search a regex without replacing it in perl

[Vipul03]

I want to search a regex in perl without replacing it and without going line by line to search it

Any help will be apriciable

Thanks in advance

[Icecrack]

Question:
What have your tried so far?

How can we work with what you want, if we do not know the information we are looking for?

Thanks

Charlie

[KevinADC]

You can't search a regexp, the question makes no sense. You can search a file or a database, but you can't search a regexp.

[Vipul03]

I have tried to serch each and every line in the file using

open FH,"log";
for $line(<FH>){
if( $line =~ m/regexp/ )
{
}
}

but i dont want to look each and every line in the file

Thanks

[numberwhun]

@Vipul03
If you don't try and match against every line, how are you going to have a proper search? Inside of the if statement, if you don't do anything, like print the line or the line number, then you will never know that there was a match.

Regards,

Jeff

[KevinADC]

maybe this is what you want, hard to say because I guess you think we can read your mind and understand your vague question:

open FH,"log";
while (my $line = <FH>){
   if( $line =~ m/regexp/ ) {
      "Found regexp in $line\n";
      last; $stops searching after first match
   }  
}
close FH;
 

If thats not what you are trying to do then please explain yourself properly so other people can understand what your requirements are.

[Icecrack]

@KevinADC
I know in the quick making of that script you may of made a mistake or typo at

$stops Searching

[KevinADC]

@Icecrack
Yes thanks, should have been "#stops searching" instead of "$stops Searching".