¿Pero si deseáramos hacer lo contrario? es decir aquellos nombres de archivos que no contienen la extensión .com . Encontré por allí buscando la siguiente solución para Python y Perl.
.*[.](?!com$|exe$).*$
(?!com$|exe$) coincide si el archivo no termina con com o exe. ?! al inicio de un grupo o paréntesis niega toda la expresión del mismo. Ademas no avanza la posición del cursor de evaluación que se quedo en [.] por lo que se necesita poner .*$.
Nota: (?! ExpRegular ) es una extensión de Perl a las expresiones regulares incluidas en algunos lenguajes como Python. Prueben si su lenguaje lo soporta.