open my $BYTE, '>:utf8', \ my $bytes;