목록2019/08/15 (1)

준호씨의 블로그

perl - string trim, ltrim, rtrim

perl 에서는 기본함수로 trim 함수를 제공하고 있지 않아서 좀 아쉽습니다. 정규 표현식을 이용하여 만든 trim, ltrim, rtrim 함수 입니다. sub trim { my $s = shift; $s =~ s/^\s+|\s+$//g; return $s; }; sub ltrim { my $s = shift; $s =~ s/^\s+//; return $s; }; sub rtrim { my $s = shift; $s =~ s/\s+$//; return $s; }; 다음은 사용예제 입니다. my $some_str = " hello world "; print "===$some_str===\n"; # === hello world === my $trimmed_str = trim($some_str); prin..
개발이야기 2019. 8. 15. 22:39
Prev 1 Next