用什么命令能把十进制数转化成二进制的？

cuculu

虽然有个sort函数，排序很方便，但是它是从左往有排序的，这样11会排在2的前面。

是否把十进制数转换成二进制的就能排序了？那么用什么函数作这个转化呢？

怒剑狂啸

原帖由 cuculu 于 2005-12-27 13:32 发表
虽然有个sort函数，排序很方便，但是它是从左往有排序的，这样11会排在2的前面。

print sort {$a<=>$b} @data;

RobinHoo

10进制变2进制
$a=sprintf("%b",$a)+0;

wangchick

原帖由 RobinHoo 于 2005-12-27 21:35 发表
$a=sprintf("%b",$a)+0;

我这里不行啊，$a 一直是0

怒剑狂啸

$a要给值才行的。

wangchick

原帖由 怒剑狂啸 于 2005-12-29 16:34 发表
$a=10;
$a=sprintf("%b",$a)+0;
printf "\$a=$a";

这样打印出来的结果是:

$a=0

怎么实现RobinHoo所说的进制转换？

apile

#!/usr/bin/perl
$a = 11;
$a=sprintf("%b",$a)+0;
print "$a\n";

$abc = unpack("B*",pack("C",11));
print "$abc\n";

这方式也行用unpack...

RobinHoo

可以的哇！

C:\>more test.pl
#!/usr/bin/perl -w
$a=10;
$a=sprintf("%b",$a)+0;
print $a."\n";

C:\>perl test.pl
1010

C:\>

wangchick

不可以的哇！

/perl>cat bin.pl
#!/usr/bin/perl -w
$a=10;
$a=sprintf("%b",$a)+0;
print $a."\n";

$abc = unpack("B*",pack("C",11));
print "$abc\n";


/perl>bin.pl
Invalid conversion in sprintf: "%b" at bin.pl line 3.
Argument "%b" isn't numeric in add at bin.pl line 3.
0
00001011

apile

我给的有显示啊..只是多了前面的四个0......
至於sprintf为什麽不行..不知道...也许跟perl版本有关系...