if($array[$i] =~ /$ .pst/)