[bcn-pm] regexp

[Xavier Pegenaute]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hola,

si, al final lo haré mas o menos así. Si acaso luego os paso un ejemplo
mas y os formulo la pregunta de otra manera.

Gracias por todo!!
Xavi.
Enrique Nell escribió:
> Hola Xavier
> 
> ¿Puedes enviar un ejemplo de línea?
> Suponiendo que te refieres a líneas que contienen cosas como
> "Paraula22Indefinit", en principio, podrías hacerlo así:
> 
> while (<$fh>) {
> 	chomp;
> 
> 	my @words = split /\s+/;	
> 
> 	for (my $i = 0; $i<=$#words; $i++) {
> 		if ($words[$i] =~ /Paraula\d{1,3}(.+)$/) {
>     			print "Columna ", $i+1, ": $1\n";
> 		}
> 	}
> }
> _______________________________________________
> llista dels Barcelona-pm
> Barcelona-pmapm.org
> http://mail.pm.org/mailman/listinfo/barcelona-pm
> BCN Perl Mongers: http://barcelona.pm.org

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.5 (GNU/Linux)
Comment: Using GnuPG with SUSE - http://enigmail.mozdev.org

iD8DBQFF2sXJsZ9ijtD23KoRAn21AJ9HtePuXTQNCIjXPA+6pjYFAyWO2gCfXF8v
dTCi+rrAcFx4pO5YwZPy/Xk=
=uALa
-----END PGP SIGNATURE-----