문자열을 자르는 방법으로 함수 또는 정규식을 사용할 수 있습니다.
이번에는 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
세 번째 파라미터인 길이를 생략한 경우 시작 위치부터 마지막까지 문자열을 자릅니다.
뒤에서부터 문자열을 자르고 싶은 경우에는 시작 위치에 마이너스 값으로 지정하고 문자열 길이를 생략하면 됩니다.
댓글