perl -e '$a="MIN.(NERR_VOL2)"; $b="$a" ; $x = ( qq/$a/ eq qq/$b/ ) ; print "$a == $b ? $x \n" ;'