Perl 프런트 및 드래그 끝 공백 삭제(좌우 공백, 공백 문자 삭제)
왼쪽 정리
ltrim 또는 lstrip은 문자열 왼쪽에서 공백 문자를 삭제합니다.
$str =~ s/^\s+//;
문자열의 시작^부터 하나 이상의 공백 문자 (\s+) 를 일치시키고 빈 문자로 바꿉니다.오른쪽 정리
rtrim 또는 rstrip 문자열 오른쪽에서 공백 문자 삭제:
$str =~ s/\s+$//;
문자열 끝 ($) 까지 하나 이상의 공백 문자 (\s+) 를 일치시키고 빈 문자로 바꿉니다.양쪽 끝을 정리하다
trim 문자열 양쪽의 빈 문자를 삭제합니다.
$str =~ s/^\s+|\s+$//g
위의 두 개의 정규 표현식 또는 기호 | 를 연결하고 마지막에/g 를 추가하여 전역적으로 교체 작업을 수행합니다 (여러 번 반복).함수에 봉인하다
만약 코드에서 이러한 구조를 보고 싶지 않다면, 코드에 이 함수를 추가할 수 있습니다.
sub ltrim { my $s = shift; $s =~ s/^\s+//; return $s };
sub rtrim { my $s = shift; $s =~ s/\s+$//; return $s };
sub trim { my $s = shift; $s =~ s/^\s+|\s+$//g; return $s };
사용 시 다음과 같이 하십시오.
my $z = " abc ";
printf "<%s>
", trim($z); # <abc>
printf "<%s>
", ltrim($z); # <abc >
printf "<%s>
", rtrim($z); # < abc>
String::Util
String::Util만약 정말 그 물건들을 복사하고 싶지 않다면, 너는 모듈을 설치할 수 있다.
예를 들어 String::Util은 함수 trim을 제공합니다. 다음과 같이 사용할 수 있습니다.
use String::Util qw(trim);
my $z = " abc ";
printf "<%s>
", trim( $z ); # <abc>
printf "<%s>
", trim( $z, right => 0 ); # <abc >
printf "<%s>
", trim( $z, left => 0 ); # < abc>
기본적으로 양쪽을 정리합니다. 매개 변수를 제공할 필요가 없습니다.나는 내가 ltrim과 rtrim을 실현하는 것이 좀 뚜렷할 것이라고 생각한다.Text::Trim
또 다른 모듈 Text::Trim은 3개의 함수를 제공하지만, Perl 스타일의 작법을 극도로 채택하여 위험한 지경에 이르렀을 수도 있습니다.
만약 그것을 호출하고 반환 값을 print 문장에 사용하거나 변수에 부여한다면, 정리된 문자열을 되돌려주고 원시 문자열을 변하지 않게 합니다.
use Text::Trim qw(trim);
my $z = " abc ";
printf "<%s>
", trim($z); # <abc>
printf "<%s>
", $z; # < abc >
다른 한편, 공백 상하문에서 그것을 호출하면, 반환 값을 사용하지 않으면,trim 함수는 파라미터를 수정하여chomp와 같은 행동을 하게 됩니다.
use Text::Trim qw(trim);
my $z = " abc ";
trim $z;
printf "<%s>
", $z; # <abc>
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
cowsay로 현장 고양이에 요시! 되고 싶은 건업무 중에도 현장 고양이에 요시! 하고 싶었기 때문에, cowsay 를 사용해 어떻게든 해 보았습니다. cowsay는 말할 것도없이 오징어 한 서버에 적합한 매혹적인 도구입니다. 살벌한 우리 마음에 일복의 청량을 줍...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.