Re: [問題] binary file 處理問題

看板Perl作者 (相見不如懷念)時間18年前 (2007/09/05 00:29), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/3 (看更多)
#!/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)
文章代碼(AID): #16tOVJkE (Perl)
文章代碼(AID): #16tOVJkE (Perl)