On Tue, 5 Mar 2002 13:19 +0200, Claudiu wrote:
 > Salut!
 > Am probleme cu niste pattern matchinguri in perl..
 > 
 > Exemplu...
 > Am un string care contine sa zicem : $string="CABLU RJ45 si CD-ROM 52x";
 > 
 > Am nevoie sa dispara din string toate cuvintele mai mici de 3 litere,
 > toate cuvintele care contin cifre si toate spatiile>1

OK, si cu ce pattern ai probleme? Sau sa inteleg ca vrei sa-ti facem
noi pattern-ul :-) Ma rog, in functie de ce consideri cuvint, poti sa
adaptezi/folosesti pattern-ul urmator.

$string =~ s/
    \s+             # spatii
    |               # sau
    \b\w{1,3}?\b    # cuvint de pina la 3 caractere, inclusiv;
                    # caracterul "-" este separator
    #\b[a-z0-9_-]{1,3}?\b    # cuvint de pina la 3 caractere, inclusiv;
                            # caracterul "-" este considerat element
                            # al unui cuvint
    |               # sau
    \b\w*?\d+\w*?\b # cuvinte ce contin cifre
    //xg;           # sterge


-- 
Radu Greab
---
Send e-mail to '[EMAIL PROTECTED]' with 'unsubscribe rlug' to 
unsubscribe from this list.

Raspunde prin e-mail lui