On Sat, 20 Jan 2001, Octavian Popescu wrote:
> Se da:
> 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
> (zzz). Cuvintele sunt delimitate de %00. Pe mine ma intereseaza ca in
> variabila respectiva sa ramana doar ultimul cuvant,fara paranteze.
> Mersi in avans (sper sa am pt ce)
incearca asa:
@v = split / /, "xxx yyy (zzz)";
$last = $v[@v];
$last =~ s/[\[\]\(\)]//g;
print $last;
desigur, s-ar putea si mai scurt, da' nu-s asa meseriash :)
iulian
---
Send e-mail to '[EMAIL PROTECTED]' with 'unsubscribe rlug' to
unsubscribe from this list.
