[Perl] Manejado strings

Gunnar Wolf gwolf@campus.iztacala.unam.mx
Thu, 6 Jun 2002 18:01:48 -0500 (CDT)


> Tengo una pregunta como puedo hacer para hacer un script para detectar
> una letra en particular en un string por ejemplo $string=3D"perl" como
> puedo detectar la letra "r" y sustituirla por otra letra...alguna
> idea??..

Hay muchas maneras. La primera con index - te regresa la posici=F3n
(iniciando en cero) de una cadena en otra. Si no existe, te regresa -1.

print index('perl','r');           # 2
print index('perlazo','lazo');     # 3
print index('perlito','a');        # -1

As=F3mate a 'perldoc perlfunc' o, m=E1s f=E1cil, 'perldoc -f index'.

Por otro lado, mucho m=E1s potente aunque con mucho mayores requisitos de
procesador, tienes a las expresiones regulares... Que son motivo de libros
enteros. 'perldoc perlre' es un buen recurso.

Saludos,

--=20
Gunnar Wolf - gwolf@campus.iztacala.unam.mx - (+52-55)5623-1118
PGP key 1024D/8BB527AF 2001-10-23
Fingerprint: 0C79 D2D1 2C4E 9CE4 5973  F800 D80E F35A 8BB5 27AF