Select Code to Download

use strict;
use warnings;
...
    use utf8;
    ff(%hash); # now prints 0
};

The "use utf8" pragma tells the Perl parser to allow UTF-8 in the pro-
gram text in the current lexical scope (allow UTF-EBCDIC on EBCDIC
...
script is written in UTF-8. The utility functions described below are
useful for their own purposes, but they are not really part of the
"pragmatic" effect.