Re: [PERL] Regexp substitution med variable?

[Peter Makholm <sslug@sslug>]

"Morten Egelund Rasmussen" <sslug@sslug> writes:

> $var =~ s/spiser vi ([a-zæøå]+)/"æder vi " . $a->{$1}/e;

Det "problem" bør kunne løses ved at bruge 'use locale;' i begyndelse
af dit script og så skrive:

$var =~ s/spiser vi ([[:alpha:]]+)/"æder vi " . $a->{$1}/e;

-- 
 Peter Makholm     |   First you fall in love with Antarctica, and then it
 sslug@sslug |                                     breaks your heart
 http://hacking.dk |                                         -- Antarctica