binmode STDIN, ':utf8'; binmode STDOUT, ':utf8'; binmode STDERR, ':utf8'; use utf8; #### binmode $DB::OUT, ':utf8';