Perl: Funktion zum Trimmen von führenden und nachfolgenden Leerzeichen

Gibt es eine eingebaute Funktion, um führende und nachfolgende Leerzeichen so zu kürzen, dass trim(" hello world ") eq "hello world"?

Hier ist ein Ansatz mit einem regulären Ausdruck:

$string =~ s/^\s+|\s+$//g ;     # remove both leading and trailing whitespace

Perl 6 wird eine Trimmfunktion enthalten:

$string .= trim;

Quelle: Wikipedia

Dies ist in String :: Util mit der folgenden trimMethode verfügbar :

^{Anmerkung des Herausgebers: String::Utilist kein Kernmodul, aber Sie können es von CPAN mit installieren [sudo] cpan String::Util.}

use String::Util 'trim';
my $str = "  hello  ";
$str = trim($str);
print "string is now: '$str'\n";

Drucke:

Zeichenfolge ist jetzt "Hallo"

Es ist jedoch einfach genug, sich selbst zu tun:

$str =~ s/^\s+//;
$str =~ s/\s+$//;

Es gibt keine eingebaute trimFunktion, aber Sie können Ihre eigene einfach mit einer einfachen Ersetzung implementieren:

sub trim {
    (my $s = $_[0]) =~ s/^\s+|\s+$//g;
    return $s;
}

oder zerstörungsfreie Substitution in Perl 5.14 und höher verwenden:

sub trim {
   return $_[0] =~ s/^\s+|\s+$//rg;
}

Nach diesem Perlmonk-Thread :

$string =~ s/^\s+|\s+$//g;

Vollständiges Howto in der Perfaq hier: http://learn.perl.org/faq/perlfaq4.html#How-do-I-strip-blank-space-from-the-beginning-end-of-a-string-

Für diejenigen, die Text :: CSV verwenden, habe ich diesen Thread gefunden und dann im CSV-Modul festgestellt, dass Sie ihn über den Schalter entfernen können:

$csv = Text::CSV->new({allow_whitespace => 1});

Die Logik ist insofern rückwärts, als Sie, wenn Sie sich entfernen möchten, auf 1 setzen. Hoffe das hilft jedem.

Eine Option ist Text :: Trim :

use Text::Trim;
print trim("  example  ");

Bewerben: s/^\s*//; s/\s+$//;darauf. Oder verwenden s/^\s+|\s+$//gSie, wenn Sie Lust haben möchten.

Ich verwende auch einen positiven Lookahead, um sich wiederholende Leerzeichen im Text zu kürzen:

s/^\s+|\s(?=\s)|\s+$//g

Nein, aber Sie können den s///Substitutionsoperator und die \sWhitespace-Zusicherung verwenden, um das gleiche Ergebnis zu erzielen.