C:\Users\rolflangsdorf>perl
$a=chr(0xE4); print "$a matched \\w" if $a =~/^\w/;
__END__

C:\Users\rolflangsdorf>perl -v

This is perl 5, version 32, subversion 1 (v5.32.1) built for MSWin32-x64-multi-thread