Re: [問題] binary file 處理問題
#!/usr/bin/perl
open(FILE, "user.dat");
binmode(FILE);
while(read(FILE, $buffer, 4)) {
print sprintf("%2s "x4, unpack("H2"x4, $buffer)),$/;
}
close(FILE);
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.111.66.27
※ 編輯: LiloHuang 來自: 140.111.66.27 (09/05 00:33)
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 2 之 3 篇):
Perl 近期熱門文章
PTT數位生活區 即時熱門文章