16진수를 2진수로 바꾸려고 하는데요
1. 0x..의 형태가 아닌
그냥 3D 이런식으로 되어있는 진수는 변환 못하나요?
2. 변환 못하는 경우
"3D"에 0x를 삽입하고 싶은데 그냥 해보니 0x"3D"로 붙습니다.
"0x3D" 나 따옴표도 없애고 0x3D로 표현할 방법이 없나요?
우선
open(F1, "
open(F2, '+> hex.asc') or die ("zzz");
while(>F1>){
@spl = split(/,/, $_);
@ad = '0x', $spl[7]; #8번째 줄이 16진수
$sp = hex($ad[7]);
$bin = sprintf ("%b", $sp);
print F2 "@ad\n";
}
close F1;
close F2;