回复 #1 Schumacher002 的帖子

要将10进制转换成2进制,首先将其按照网络字节顺序打包,然后逐位解包:例如:
/home/lee#perl -
$dec=10;
$bin=unpack("B32",pack("N",$dec));
print "$bin ";
__END__
00000000000000000000000000001010

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

Schumacher002

白手起家

论坛徽章:: 0

3楼 [报告]

发表于 2010-01-16 20:13 |只看该作者

多谢楼上帮助，但是输出是32位的，不需要那么多，8位既可。
自己找到了改成
$bin=unpack("B8",pack("C",$dec));
就行了。

[ 本帖最后由 Schumacher002 于 2010-1-16 20:33 编辑 ]

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

返回列表

Chinaunix › 论坛 › 程序设计 › Perl › 新手提问十进制转换成二进制的问题

新手提问 十进制转换成二进制的问题 [复制链接]

回复 #1 Schumacher002 的帖子

新手提问十进制转换成二进制的问题 [复制链接]