用户工具

站点工具


linux:perl:cpan:bit-vector

差别

这里会显示出您选择的修订版和当前版本之间的差别。

到此差别页面的链接

两侧同时换到之前的修订记录前一修订版
后一修订版
前一修订版
linux:perl:cpan:bit-vector [2020/08/06 08:36] – [3. 使用举例] zhangguolinux:perl:cpan:bit-vector [2023/03/17 10:12] (当前版本) – 外部编辑 127.0.0.1
行 369: 行 369:
 <code perl> <code perl>
 #!/usr/bin/perl #!/usr/bin/perl
 + 
 use Bit::Vector; use Bit::Vector;
 + 
 +## from hex
 +$vec = Bit::Vector->new_Hex(32,"cc");
 +$hex_str = $vec->to_Hex();
 +print "hex_str = $hex_str\n";
 +$bin_str = $vec->to_Bin();
 +print "bin_str = $bin_str\n";
  
-$vector = Bit::Vector->new_Hex(12,"cc"); 
  
-$bin_str = $vector->to_Bin(); 
  
 +
 +## from bin
 +print "\n";
 +$vec = Bit::Vector->new_Bin(32, "11100011");
 +$hex_str = $vec->to_Hex();
 +print "hex_str = $hex_str\n";
 +$bin_str = $vec->to_Bin();
 print "bin_str = $bin_str\n"; print "bin_str = $bin_str\n";
  
-$hex_str = $vector->to_Hex(); 
  
 +##############
 +print "\n";
 +$vec = Bit::Vector->new(32);
 +$vec->Bit_Copy(0,1);
 +$vec->Bit_Copy(4,1);
 +$vec->Bit_Copy(5,1);
 +$hex_str = $vec->to_Hex();
 print "hex_str = $hex_str\n"; print "hex_str = $hex_str\n";
 +$bin_str = $vec->to_Bin();
 +print "bin_str = $bin_str\n";
 +
 +
 +
 +
 +
 </code> </code>
  
 运行结果: 运行结果:
 <code> <code>
-bin_str = 000011001100 +hex_str = 000000CC 
-hex_str = 0CC+bin_str = 00000000000000000000000011001100 
 + 
 +hex_str = 000000E3 
 +bin_str = 00000000000000000000000011100011 
 + 
 +hex_str = 00000031 
 +bin_str = 00000000000000000000000000110001 
 </code> </code>
  
-需要注意在new_Hex()时,不能输入0x的样式,只能输入纯16进制部分。+需要注意在new_Hex()时,不能输入0x的样式,只能输入纯16进制部分字符串
  
 ==== - 获取指定bit value ==== ==== - 获取指定bit value ====
linux/perl/cpan/bit-vector.1596674176.txt.gz · 最后更改: 2023/03/17 10:12 (外部编辑)

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki