regex - tester - ¿`(? PARNO)` de Perl descarta sus propias capturas nombradas cuando termina?