Select Code to Download

use utf8;
use open ':std', ':utf8';
...
    close $FH;

...

    $size == $data =~ y///c or die "Error reading from '$file'\n";