mwultong Blog ... 프로그래밍 / 계산기

컴퓨터 엑셀 워드 포토샵 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Monday, May 14, 2007

Perl 펄] 헥사 값을 문자열로 변환 출력 함수; Hex to ASCII String


예를 들어, "41 70 70 6C 65" 또는 "0x41 0x70 0x70 0x6C 0x65" 이런 헥사 값으로 이루어진 문자열이 있을 때, 이것을 "진짜 아스키 문자열"로 변환하는 함수입니다. 참고로, 위의 헥사 값을 아스키 문자열로 변환하면 "Apple" 이라는 단어가 됩니다.

헥사(Hex) 값을, 아스키 문자(문자열)로 변경 예제


파일명: example.pl
※ 아래 박스 클릭 후, 키보드 화살표 키로 좌우 스크롤 가능함
#!/usr/bin/perl
use strict; use warnings;


  # "Apple"이라는 문자열의 헥사 값 정의
  my $hex = "41 70 70 6C 65";

  print hexToString($hex);
  # 출력 결과: Apple



  print "\n\n"; # 편의상 줄바꿈



  # "0x"라는 접두어가 붙어 있어도 됩니다.
  $hex = "0x41 0x70 0x70 0x6C 0x65";

  print hexToString($hex);
  # 출력 결과: Apple




sub hexToString {
  my @a = split(/\s/, $_[0]); # 공백으로 구분된 헥사 값들을 분리하여 배열로
  my $result = "";

  foreach (@a) {
    $result .= chr(hex($_));
  }
  return $result;
}



▶▶ Perl 펄] 이진 문자열 여부 판단, 문자열을 헥사로 출력; Binary String to Hex




tag: perl
Perl | 펄

0 Comments:

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Previous Posts
Monthly Archives
Top