[rlug] Re: regex guru wanted

[Tarhon-Onu Victor]

On Sat, 20 Jan 2001, Octavian Popescu wrote:

> hideout:~# echo "xxx yyy (zzz)" | awk '{print $NF}' | tr -d "[(,)]"
> zzz
> ...si se cere sa se traduca in perl.Practic - am o variabila $i care
> contine un string de genul celui de mai sus,in care ultimul word e

echo "xxx yyy (zzz)" | perl -e 'my $l=<>; chop($l); $l =~ \
s/(\w+\s\w+\s\W)(\w+)\W$/$2/g; print "$l\n";'


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