Есть ли у нас мощная мощная библиотека Perl для поддержки текстовых / строковых операций? например, если мне нужно обрезать строку, мне нужно написать функцию, как показано ниже.
Тогда вопрос в том, есть ли у нас существующий API, чтобы я мог его импортировать и вызывать? точно так же, как StringUtils.trim (s) в Apache Common Lang.
Спасибо.
sub trim($) {
my $string = shift;
$string =~ s/^\s+//;
$string =~ s/\s+$//;
return $string;
}