Help for this page

Select Code to Download


  1. or download this
    for l in C hu_HU de_DE; do echo $l:; LANG=$l perl -we 'use locale; for
+ $s ("\x{e1}", "\x{151}", "\x{a3}") { for $r (qr/\w/, qr/[[:alnum:]]/
+, qr/\pL/) { printf qq["\\x{%x}" %s /%s/\n],
ord($s), ($s =~ qr/$r/) ? "=~" : "!~", $r; } }'; done
  2. or download this
    C:
"\x{e1}" !~ /(?-xism:\w)/
...
"\x{a3}" !~ /(?-xism:\w)/
"\x{a3}" !~ /(?-xism:[[:alnum:]])/
"\x{a3}" !~ /(?-xism:\pL)/