| [ CnUnix ] in KIDS 글 쓴 이(By): terzeron (microkid) 날 짜 (Date): 2002년 2월 22일 금요일 오전 09시 20분 46초 제 목(Title): Re: [q] 숫자 <-> 문자. 1. 이건 이해가 안 되는 문제네요. 숫자 012345가 어떻게 저장되어있죠? $a = 012345; 와 $a = 12345는 다릅니다. 이러면 자릿수가 안 맞아서 문제가 모호해집니다. $a = "012345"라고 가정하면 다음과 같이 해결할 수 있죠. $a =~ /(\d\d)(\d\d)(\d\d)/; $b = $1; $c = $2; $d = $3; 2. Perl은 문자열과 숫자를 구분하지 않으므로 숫자처럼 쓸 수 있습니다. $a = "01"; $b = "23"; $c = "45"; $d = $a . $b . $c; # $d = "$a$b$c"도 가능 $d++; # 덧셈 연산이 가능한지 테스트 print "d=$d\n"; # 012346 3. 이건 깔끔하게 하려면 좀 어렵습니다. $a = "01"; $b = "02"; $c = "03"; ($d, $e, $f) = map {$_ + 128} $a, $b, $c; print "d=$d e=$e f=$f\n"; 그냥 무식하게 각 문자열에다가 + 128 해줘도 됩니다. ^^ |