Saturday, November 18, 2006
Perl/펄] reverse 연산자(함수) 사용법 예제 소스; reverse Example
reverse 는 "함수"처럼 보이지만 "연산자(Operator)"입니다.
배열의 경우에는, 요소들의 순서를 거꾸로 뒤집고,
문자열에서는 글자들의 순서를 반대로 합니다. 다만 한글 문자열은 잘 되지 않고 깨지더군요.
파일명: 0.pl
reverse 는, 문자열 배열을 역순으로 소팅할 때에도 사용할 수 있습니다: ▶▶ 펄/Perl] 문자열 배열 정렬(소팅), sort 함수 사용법: Sort String Array
배열의 경우에는, 요소들의 순서를 거꾸로 뒤집고,
문자열에서는 글자들의 순서를 반대로 합니다. 다만 한글 문자열은 잘 되지 않고 깨지더군요.
reverse : 배열/문자열 순서 반대로 뒤집기 예제 소스
파일명: 0.pl
#!/usr/bin/perl
use strict; use warnings;
######################################
# 배열 순서 거꾸로 뒤집기
my @a = qw( AAA BBB CCC );
@a = reverse @a;
print "$_ " foreach (@a);
# 출력 결과: CCC BBB AAA
print "\n\n"; # 편의상 줄바꿈
######################################
# 문자열 순서 거꾸로 뒤집기
my $s = "ABCD";
$s = reverse $s;
print $s, "\n";
# 출력 결과: DCBA
use strict; use warnings;
######################################
# 배열 순서 거꾸로 뒤집기
my @a = qw( AAA BBB CCC );
@a = reverse @a;
print "$_ " foreach (@a);
# 출력 결과: CCC BBB AAA
print "\n\n"; # 편의상 줄바꿈
######################################
# 문자열 순서 거꾸로 뒤집기
my $s = "ABCD";
$s = reverse $s;
print $s, "\n";
# 출력 결과: DCBA
reverse 는, 문자열 배열을 역순으로 소팅할 때에도 사용할 수 있습니다: ▶▶ 펄/Perl] 문자열 배열 정렬(소팅), sort 함수 사용법: Sort String Array
tag: perl
Perl | 펄
<< Home