Saturday, December 29, 2012

Perl 에서 decimal 과 hexadecimal 사이의 변환

Decimal → Hexadecimal
 print(tohex(254));
 sub tohex  
 {  
      my $s = sprintf("%X",$_[0]);  
      if(length($s) % 2 == 1){  
           $s = "0" . $s;  
      }  
      return $s;  
 }  
출처 : Perl 에서 integer 를 hexadecimal 로 바꿔주는 함수
Hexadecimal → Decimal
 print(hex("FF"));
레퍼런스 : how to convert decimal to hexadecimal in perl
키워드 : 10진수, 16진수, 십진수

No comments:

Post a Comment