$ perl -le'print chr(0x09E6) =~ /^\d\z/ || 0'
1