Regex: Alle Vornamen der Welt erlauben - #159705 (Allgemeines zu Perl)

topeg

2012-07-10 20:57

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Wenn der String perlintern als Unicode markiert ist kannst du "\w" nutzen. Das umfasst alle alle Wortzeichen in allen Sprachen. Aber halt nur für Unicode.

Code (perl): (dl )

#!/usr/bin/perl
use strict;
use warnings;
use utf8;

my $str="Marc-Andre André Макси Лерочка";

print "NAME: $1\n" while($str=~/([\w-]+)/gc);