Re: [PERL] "\W" og "\w"?

[Peter Andreasen <sslug@sslug>]

* Jacob Sparre Andersen (sslug@sslug) [2001-10-03 18:57]:
> Rødder:
> 
> $ echo "Eksempler: At skriver. At tænker." | perl -pe
> 's/(\W(at|vil|ville|kan|kunne|skal|skulle|må|måtte)
> \w+)r(\W)/$1$3/gi' 
> Eksempler: At skrive. At tænker.

Hmm. Det virker hos mig hvis jeg skriver

  export LC_ALL=da_DK.ISO8859-1

og bruger "use locale;" i perl-script'et: Altså:

-------------------------------------------------
sslug@sslug:~$ echo "Eksempler: At skriver. At tænker." | perl -pe 'use
locale; s/(\W(at|vil|ville|kan|kunne|skal|skulle|må|måtte)
\w+)r(\W)/$1$3/gi'
Eksempler: At skrive. At tænke.
-------------------------------------------------

Men den med LC_ALL er vist at skyde med store kanon-kugler.

Jeg har blot skimmet lidt i "man perllocale".
"Locale" ligner noget man skal have brug for før man gider
sætte sig ind i det! Du har brug for det, så når du har fundet
den dybe sandhed, kan du så ikke bringe os andre "enlightenment" med
et lille resume? :)

Ovenstående er da en start...

 - peter

-- 
Peter Andreasen <sslug@sslug> | http://pandr.dk | ln -s /dev/random ~/.plan
------ Fingerprint: 4311 664F 8034 EB15 C75B  30F0 9729 BCD9 0E11 4DA4 -------