say Blob.new('abcde'.encode('utf8')).unpack("H*");
say '0x'~'abcde'.encode('utf8').unpack("H*");
use experimental :pack; say Blob.new(1..10).unpack("H*"); # OUTPUT: «(1 2 3 4 5 6 7 8 9 10)»
可以看这里的链接
posted on 2018-09-10 22:26 Perl6 阅读(934) 评论(1) 编辑 收藏 举报