perl -E '@foo=unpack("Z6Z4", "Hello Joe "); say ">$_<" for @foo'
>Hello <
>Joe <