Re: match pattern from two different file

[Anonymous Monk]

This is syntax error

if # you forgot some parens here, like someone said
        {    $line1=~ /^$pattern/;
                        $line2=~ /^$pattern/;
                         $line1==$line2;
                        {  print $line1;    }
}

Also

my $pattern='/^LOC_Os0[1-7]g[0-9]*.[0-9]\s';
...
$line1=~ /^$pattern/;
# $line1 (and 2) will expand to smth like /^^LOC_0s.../, which is prob
+ably not what you want. Try
my $pat = qr/^LOC_0s.../
$line1 =~ $pat;

[Anonymous Monk]

I mean patterns, not lines, will expand to that. They will start with double ^. That is a regex error.

[Anonymous Monk]

I remove the if condition and change it pattern according to u .it runs but result is not as it should be. the whole file comes as output