📅  最后修改于: 2022-03-11 14:50:19.100000             🧑  作者: Mango
$ echo AB | perl -lpe '$_=join " ", unpack"(B8)*"'
01000001 01000010
$ echo 01000001 01000010 | perl -lape '$_=pack"(B8)*",@F'
AB