[bcn-pm] Expresiones regulares.

[Xavier Noria]

On Apr 12, 2005, at 9:02, TooManySecrets wrote:

> Realmente, cuanto más sencillas puedan ser las cosas, más cuesta a 
> veces
> de verle la solución... juas!! De todas formas, ya que estamos puestos,
> si alguien me dice igualmente cómo podría trasladar ésto a Perl, pues
> mejor que mejor.

Lo equivalente en Perl seria usar el flag -a (autosplit), que hace 
split al array especial @F (el split es con ' ' por defecto, que puede 
configurarse con la opcion -F):

     % cat <<EOF | perl -anle 'print "@F[0, 2, 3, 4]"'
     pipe heredoc> n1 a1 d1 l1 p1
     pipe heredoc> n2 a2 d2 l2 p2
     pipe heredoc> EOF
     n1 d1 l1 p1
     n2 d2 l2 p2

-- fxn