chinaunixnet perl pack
$line = "0a00"; $out = pack("H4",$line); $out = 0D 0A 00 本来我以为$out = 0A 00的 ，请问下这是怎么回事啊？
by paopaow2004 - Perl - 2009-04-09 18:35:23 阅读（1675） 回复（6）
$buf=pack("CCCC",140,); print "this is [$buf]\n"; $buff=unpack("i",$buf); print "this is [$buff]\n"; 运行结果 this is [宂 this is [] 为什么我先用pack将信息打包，然后用unpack将信息解包无法还原啊？ 是我理解错误还是代码写错了？ 请高手指教。
看了一个下午的perlpacktut文档，网上书上的例子也试过，但还是不太明白. pack Expr List ------->把List打包成Expr规定的二进制结构 对于Expr的A C还是比较好的 尤其是对H(h) B(b)我弄糊涂了. H 十六进制字符串(高位在前） h 十六进制字符串(地位在前） b 位次由高到低的位串 B 位次由低到高的位串 按定义H等格式应该指转换后的格式，被转换List的应该可以是任意List. 但 $buf=pack("H4","3061"); #这里被转换的好像只能是十六...
raw格式灰度图片数据 写数据 @image按行顺序取图片灰度数据 print $FILE pack("LLC*",$width,$height,@image); 读数据 $data={local $\;<$FILE>} ($width,$height,@image)=unpack("LLC*",$data); 图片正常显示 在VC模式下 int width,height;BYTE *image; image=new BYTE[width*height]; read FILE width read FILE height read iFILE image 为什么对应的图像变成了反的了
（没翻译完，明儿再翻译） pack -- pack data into binary string. pack —— 打包数据为二进制字符串。 Description 描述 string pack ( string format [, mixed args]) pack given arguments into binary string according to format. Returns binary string containing data. pack函数返回 根据format定义的格式将args 转换成的二进制字符串 The idea to this function was taken from perl and all formatting codes work the...
我们项目用c开发 但是需要跟php socket通讯 第一次用pack出现问题 我需要将一个无符号整形和一个32位的md5字符串打包 我这样打包$data = pack("Va32",$head,$md5); 但是我打印$data的值怎么只有$md5的值?$head的值怎么没打包进去?($head,$md5这两个变量都是有值的);
my $val2 = unpack("ll","ABCD"); print $val2; 这段代码，我本以为会打印类似0x41424344 (ABCD的ascii码) 但是结果却是1145258561 这是为什么阿？各位指教以下 我用的win2000操作系统，Activeperl5.8.
我有一个数组@arr，在pack的时候使用pack("a16"x scalar(@arr),$msg)打包 我unpack之前也无法知道数组大小啊，unpack的时候该怎么写呢？？ 还是我pack就已经写错了？？ [ 本帖最后由 huhuegg 于 2009-8-26 18:17 编辑 ]
相信許多SCO的客戶對這兩個新的名詞應該都很好奇, 到底這兩個套件有什麼不同呢? 以下我們就仔細的替各位解答一下. Maintenance pack 在這兩個名詞出現之前, 以往SCO針對每一個版本的作業系統, 若有發現任何的作業系統問題或錯誤都會推出一個所謂的修正程式, 因此在每次作業系統推出後,隨著時間成長,修正程式套件也會越來越多, 對客戶而言這也帶來了某種程度的困擾,因為只要有新的修正就必須下載安裝, 因此針對避免客戶的困擾, SC...
代码如下
[code]
function m2()
{
list($usec, $sec) = explode(' ', microtime());
return (float) $sec + ((float) $usec * 100000);
}
function t1(){
mt_srand(m2());
$a=(int)mt_rand(1,65535);
$b=(int)mt_rand(1,65535);
$c=(float)mt_rand(1,65535);
$d=(float)mt_rand(1,65535);
$str=pack('n2N2',$a,$b,$c,$d);
echo $a,',',$b,',',$c,',',$d,'
';
echo strlen($str),'
',$str,'
...
#pragma pack(4) 看到的： class TestB { public: int aa; //第一个成员，放在[0,3]偏移的位置， char a; //第二个成员，自身长为1，#pragma pack(4),取小值，也就是1，所以这个成员按一字节对齐，放在偏移[4]的位置。 short b; //第三个成员，自身长2，#pragma pack(4)，取2，按2字节对齐，所以放在偏移[6,7]的位置。 char c; //第四个，自身长为1，放在[8]的位置。 };...
