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