Tuesday, January 03, 2006
[펄/Perl] 디버깅용 해쉬 덤프 (Hash Dump)
디버깅의 기본은 변수의 내용을 확인하는 것이다. 변수 내용을 알아보는 가장 원시적이고 가장 확실한 방법은 그것을 화면에 출력해 보는 것이다. 펄에서 해쉬라는 것은 변수의 형식으로 구현되는 간단한 데이터베이스다. (MD5 같은 해쉬와는 전혀 다른 개념이다.)
key 를 소트하도록 했기 때문에 "그리스"가 맨 위로 가는 등 가나다 순으로 출력된다. 해쉬는 뒤죽박죽으로 데이타를 저장하기에 출력 때는 소팅을 한 번 해 주는 것이 보기 쉽다.
▶▶ [펄 기초] Perl 의, Hash (해쉬/해시) 정의, 사용법
☞ Perl
key 를 소트하도록 했기 때문에 "그리스"가 맨 위로 가는 등 가나다 순으로 출력된다. 해쉬는 뒤죽박죽으로 데이타를 저장하기에 출력 때는 소팅을 한 번 해 주는 것이 보기 쉽다.
#!/usr/bin/perl
use strict; use warnings;
my %cities = (
"한국" => "서울",
"일본" => "도쿄",
"그리스" => "아테네",
"미국" => "워싱턴",
"프랑스" => "파리",
);
&DumpHash(%cities);
sub DumpHash {
%_ = @_;
print "Number of Items: ", scalar keys(%_), "\n";
foreach my $key (sort keys %_) {
print "\"$key\" => \"$_{$key}\"\n";
}
}
use strict; use warnings;
my %cities = (
"한국" => "서울",
"일본" => "도쿄",
"그리스" => "아테네",
"미국" => "워싱턴",
"프랑스" => "파리",
);
&DumpHash(%cities);
sub DumpHash {
%_ = @_;
print "Number of Items: ", scalar keys(%_), "\n";
foreach my $key (sort keys %_) {
print "\"$key\" => \"$_{$key}\"\n";
}
}
▶▶ [펄 기초] Perl 의, Hash (해쉬/해시) 정의, 사용법
☞ Perl
Post a Comment
<< Home