$ perl -e'           die "Validation error" if uc(chr(0xE9))=~/\xC9/;'

$ perl -e'use 5.012; die "Validation error" if uc(chr(0xE9))=~/\xC9/;'
Validation error at -e line 1.