🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #5919

Regexp & Perl: Como sustituir varias palabras parecidas

#5919
From: Francesco Moi
Date: Mon, 01 Sep 2003 22:31
17 lines
1389 bytes
Hola.

En Perl, tengo una cadena con un texto, en la que me gustar�a sustituir 
las palabras 'programacion', 'programa' o 'programador' por 'program'.

Con esta RegExp funciona:
$texto =~ s/programador|programa|programacion/program/g;

Pero como son palabras muy parecidas, pensaba que se podr�a hacer
mucho m�s facil, como por ejemplo:
$texto =~ s/program[ador,a,cion]/program/g;
$texto =~ s/program[ador|a|cion]/program/g;

Pero ninguna de las dos funciona. �Alguien sabe como hacer m�s corta
la RegExp, si es que se puede?

Gracias, y un saludo.
Technical Details
Message-ID: <5b829932.0309011431.6fff8097@posting.google.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!postnews1.google.com!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: f86c8,568a4d84eb300bba,start
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2003-09-01 15:31:15 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!postnews1.google.com!not-for-mail
From: francescomoi@europe.com (Francesco Moi)
Newsgroups: es.comp.os.linux.programacion
Subject: Regexp & Perl: Como sustituir varias palabras parecidas
Date: 1 Sep 2003 15:31:14 -0700
Organization: http://groups.google.com/
Lines: 17
Message-ID: <5b829932.0309011431.6fff8097@posting.google.com>
NNTP-Posting-Host: 80.34.73.13
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: posting.google.com 1062455474 15436 127.0.0.1 (1 Sep 2003 22:31:14 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: 1 Sep 2003 22:31:14 GMT