> >> As ER que usei deram certo, solucionaram o problema,
> >> mas ficaram meio feionas...
Para efeito puramente estético, ajuda colocar trechos repetitivos da
expressão em variáveis:
$data='\d\d?\sde[JFMASOND][a-z]+\sde\d\d\d\d\';
if($texto=~/$data/) { ... }
Silvio