my $bin = pack "C*", 256;