@array = ("text1_(Right):662:19990913:662:19990913:1",
"text2(Right):8000:20020116:8000:20020116:1",
"text3:6800:20021015:6900:20021014:1");

$Symbol= "text1_(Right)";

foreach $item (@array){
  	if ($item =~ m/$Symbol/i) {
   	print "$item\n";
 		}
}