escribiendo regex más claras

Como el ejemplo anterior (substitución con ejecución con lo obtenido), hay veces que las epresiones regulares que escribimos, sobre todo en un programa largo, terminan siendo algo engorroso. Para lo cual, Perl nos deja escribir las regex en múltiples líneas.

El anterior POL, podría ser reescrito como un archivo en disco:

#!/usr/bin/perl -pw

s@
(
  \d+
  (?:
    \.\d{3}
  )
)
@
"Fecha: " . scalar(localtime($1))
@ex

Esto básicamente hace los mismo, nada más que agrega "Fecha: " por delante de la hora que noosotros estamos parseando.

Notese que lla regex, teniendo mucho espacio, no le da importancia. Esto es lo que hace (básicamente) al usar el /x.

Básicamente, es una forma que voy a utilizar para poner algunas regex más complejas, e ir comentandola para que pueda ser leida más fácilmente por todos.