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