>perl -wE "say unpack '%8C*', qq(\x{01}\x{02}\x{ff})"
2