作者fju0911 (New beginning!)
看板Perl
标题[问题] 读资料并排列的问题求救
时间Wed Oct 12 15:28:19 2011
各位板上的大大:
小弟我需要将一文件档中多组十进位及十六进位的数字转成二进位後成纵排列。
但我不晓得该如何下手。
我已经将十进位及十六进位转二进位的副程式写好了,如下:
十进位转二进位:
$dec_input=255; #这里的数字想从由文件档中取得
$bin=unpack("B32",pack("n",$dec));
@BIN=split //,$bin; #将字串存成阵列
splice(@BIN,0,8) ;#输成格式为8个bits
foreach $_(@BIN)
{
print "$_\n";
}
十六进位转二进位:
$Hex_input=10; #这的数字亦想从文件档中取得
$dec=hex $Hex_input;
$Hex=unpack("B32",pack("n",$dec));
@HEX=split //,$bin; #将字串存成阵列
splice(@HEX,0,8); #输出格式为8个bits
foreach $_(@HEX)
{
print "$_";
}
文件档的格式如下:
wr, 255, 0x00; 255为十进制,0x00为十六进制
wr, 3, 0x04;
wr, 4, 0x5a;
wr, 80, 0x5a;
欲输出的格式:
(第一笔的255)
1
1
1
1
1
1
1
1
(第一笔的0x00)
0
0
0
0
0
1
0
0
(第二笔的3)
0
0
0
0
0
0
1
1
往下以此类推...
希望各位大大帮忙给个方向 再次感谢 板主如觉得不能发这种笨问题 我立刻删文
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.66.55.154
1F:→ xatier:你的问题在於读档?? 看一下 open() 10/13 18:16
2F:→ fju0911:解决八成了~~ 10/14 13:55