{ my $a = "MIN.(NERR_VOL2)"; my $b = $a; print "matches" if $a =~ m/$b/; }