Use utf8-friendly space symbols chop operation in trim()
This commit is contained in:
@@ -23,13 +23,8 @@ sub trim {
|
|||||||
return $str;
|
return $str;
|
||||||
}
|
}
|
||||||
|
|
||||||
while (substr ($str, 0, 1) =~ /^\s$/xms) {
|
$str =~ s/^\s+//;
|
||||||
$str = substr $str, 1;
|
$str =~ s/\s+$//;
|
||||||
}
|
|
||||||
|
|
||||||
while (substr ($str, -1, 1) =~ /^\s$/xms) {
|
|
||||||
chop $str;
|
|
||||||
}
|
|
||||||
|
|
||||||
return $str;
|
return $str;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user