준호씨의 블로그

perl에서 array를 사용하는 방법은 다음과 같습니다. () 안에 값들을 넣어주면 됩니다. 출력 편의상 encode_json 함수를 사용했습니다. my @arr = ("hello", "world", "nice", "to", "meet", "you"); print encode_json(\@arr); # ["hello","world","nice","to","meet","you"] 만약 앞서 선언된 배열을 hash안에 넣고 싶다면 다음과 같이 할 수 있습니다. my @arr = ("hello", "world", "nice", "to", "meet", "you"); my %data = ( id => "myid", data => \@arr ); print encode_json(\%data); # {"id":"..

다음과 같이 hash 데이터가 있다고 했을 때 my %fruits = ( "apple" => 500, "orange" => 800, "kiwi" => 600, "ABC" => 100, "BBC" => 100, ); 그냥 반복문으로 찍으면 다음과 같이 나온다. for my $fruit (keys %fruits) { print "$fruit, $fruits{$fruit}\n"; } hash 데이터는 기본적으로 정렬을 보장하지 않는다. $ perl sort.pl BBC, 1000 kiwi, 600 apple, 500 orange, 800 ABC, 100 정렬을 해서 출력 하고 싶다면 정렬 기준을 잡아야 한다. key 로 정렬하기. sort by key 단순한 방법이다. sort 만 넣어주면 된다. for my..