if($a[$i] =~ /^$b[$j]$/i)