Gente, ¿alguno tiene a mano algún código para depurar direcciones de correo validas desde un select? Al sacarlos viene bastante sucio el listado y seguramente alguno paso por ello anteriormente...

La aplicación es de terceros y los formularios no validan nada... por ello necesito limpiar el listado en el select.

Hay varios módulos para extraer direcciones de correo electrónico. Por ejemplo, Email::AddressParser y Email::Address.