use strict;
use warnings;
my $cc = pack "CC", 195, 164;
use bytes; # mit oder ohne
print $cc; # korrekt