Friday, October 20, 2006
펄/Perl] 문자열 배열 정렬(소팅), sort 함수 사용법: Sort String Array
배열명 앞에 sort 함수를 위치시키면 그 배열을 쉽게 소트할 수 있습니다. 이것은 문자열이 든 배열을 정렬하는 방법입니다. 숫자가 든 배열은 다른 방법으로 소팅해야 합니다. (▶▶ 펄/Perl] 숫자 배열 정렬(소팅), sort 함수 사용법: Sort Number Array 참고)
또한 reverse sort ... 이렇게 앞에 reverse 를 붙이면 그 배열을 역순으로 소팅할 수 있습니다.
실행 결과 화면:
영문 문자열 배열 대소문자 구분없이 소팅하는 방법: ▶▶ Perl/펄] 대소문자 구분 없이 정렬, 문자열 배열 소팅; Sort Ignore Case, String Array
▶▶ 펄/Perl] Hash(해쉬) 정렬 Sort; 해시 숫자 key / value 소팅
▶▶ Perl/펄] 유니코드 파일 정렬(텍스트 소트,소팅); Unicode UTF-8 Text File Sort
또한 reverse sort ... 이렇게 앞에 reverse 를 붙이면 그 배열을 역순으로 소팅할 수 있습니다.
문자열 배열 소팅(정렬) 예제
#!/usr/bin/perl
use strict; use warnings;
# 문자열 배열 정의
my @foo = ( "맹구",
"배용준",
"땡칠이",
"장동건",
"강수정 아나운서",
"송창식",
"황당해",
"고은아"
);
@foo = sort @foo; # 가나다 순으로 정렬
print $_, "\n" foreach (@foo); # 배열 출력
print "\n\n\n------------------\n\n\n";
@foo = reverse sort @foo; # 다나가 역순으로 정렬
print $_, "\n" foreach (@foo); # 배열 출력
use strict; use warnings;
# 문자열 배열 정의
my @foo = ( "맹구",
"배용준",
"땡칠이",
"장동건",
"강수정 아나운서",
"송창식",
"황당해",
"고은아"
);
@foo = sort @foo; # 가나다 순으로 정렬
print $_, "\n" foreach (@foo); # 배열 출력
print "\n\n\n------------------\n\n\n";
@foo = reverse sort @foo; # 다나가 역순으로 정렬
print $_, "\n" foreach (@foo); # 배열 출력
실행 결과 화면:
D:\Z>0.pl
강수정 아나운서
고은아
땡칠이
맹구
배용준
송창식
장동건
황당해
------------------
황당해
장동건
송창식
배용준
맹구
땡칠이
고은아
강수정 아나운서
D:\Z>
강수정 아나운서
고은아
땡칠이
맹구
배용준
송창식
장동건
황당해
------------------
황당해
장동건
송창식
배용준
맹구
땡칠이
고은아
강수정 아나운서
D:\Z>
영문 문자열 배열 대소문자 구분없이 소팅하는 방법: ▶▶ Perl/펄] 대소문자 구분 없이 정렬, 문자열 배열 소팅; Sort Ignore Case, String Array
▶▶ 펄/Perl] Hash(해쉬) 정렬 Sort; 해시 숫자 key / value 소팅
▶▶ Perl/펄] 유니코드 파일 정렬(텍스트 소트,소팅); Unicode UTF-8 Text File Sort
tag: perl
Perl | 펄
<< Home