$ perl -Mcharnames=:full -le'print "\N{BENGALI DIGIT ZERO}" =~ /^\d\z/ || 0' 1