Select Code to Download

# Sometimes \w matches U+E9.
$ perl -Mfeature=say -e'say "\xE9" =~ /^\w/ || 0'
...
# \p{Word} always matches U+E9, period.
$ perl -Mfeature=say -e'say "\xE9" =~ /^\p{Word}/ || 0'
1