[SOLVED] !=~ is equal to =~ ?? perl script acting unusual

knockout_artist · 04-11-2010, 02:56 PM

Hi,

Code:

#!/usr/bin/perl

$out = "File";
open FILE, $out or die $!;

while(<FILE>){

if( $_ !=~ /NAME.SRC1.*Running./){
print "$_\n";
  }
}

close FILE;

File

Code:

NAME(SRC0)                                       STATUS(Ended normally)
NAME(SRC01)                                      STATUS(Running)
NAME(SRC1)                                       STATUS(Running)

When I execute.

Code:

check.pl 
NAME(SRC0)                                       STATUS(Ended normally)

NAME(SRC01)                                      STATUS(Running)

NAME(SRC1)                                       STATUS(Running)

now when I change !=~ to =~

Code:

#!/usr/bin/perl
$out = "File";


open FILE, $out or die $!;
while(<FILE>){

if( $_ =~ /NAME.SRC1.*Running./){

print "$_\n";

  }
}

close FILE;

I get this

Code:

check.pl 
NAME(SRC1)                                       STATUS(Running)

Which make sense. But the first one !=~ brings a false positive.

Any Ideas?

Thanks

AlucardZero · 04-11-2010, 03:22 PM

The operator is !~, not !=~

chrism01 · 04-12-2010, 01:56 AM

In addition, always start Perl progs with

Code:

#!/usr/bin/perl -w
use strict;

http://perldoc.perl.org/
http://www.perlmonks.org/?node=Tutorials