Perl 문자열 자르기 SUBSTR 사용 방법 예제

문자열을 자르는 방법으로 함수 또는 정규식을 사용할 수 있습니다.

이번에는 SUBSTR 함수를 사용해 문자열을 자르는 방법을 보겠습니다.

 

문자열 자르기

SUBSTR(문자열, 시작 위치, 길이)

문자열 – 자르고 싶은 문자열을 지정.

시작 위치 – 시작 위치 인덱스를 지정.

길이 – 자르고 싶은 문자열 길이를 지정.(생략 가능)

 

PERL에서 문자열 인덱스는 0부터 시작합니다.

예제

use strict;
use warnings;
use utf8;

my $str = "Morning";
my $sub;

print "$str¥n";

$sub = substr($str, 2);
print "$sub¥n";

$sub = substr($str, -2);
print "$sub¥n";

$sub = substr($str, 1, 2);
print "$sub¥n";

$sub = substr($str, 1, -2);
print "$sub¥n";

 

결과

rning
ng
or
orni

 

세 번째 파라미터인 길이를 생략한 경우 시작 위치부터 마지막까지 문자열을 자릅니다.

뒤에서부터 문자열을 자르고 싶은 경우에는 시작 위치에 마이너스 값으로 지정하고 문자열 길이를 생략하면 됩니다.

댓글