Perl split einen string mit einem string-basierten Trennzeichen

Ich bin ganz neu in Perl, aber auf der Grundlage der Dokumentation, die ich gelesen habe, sieht es aus wie der split-Funktion in ein Perl-fragt nach einem regex-Muster, anstatt eine Zeichenfolge, Trennzeichen, wie der erste parameter, aber ich fand, dass Sie so etwas wie print +(split(' ', $string))[0] noch split die Zeichenfolge richtig.

Basierend auf dieser, ich habe versucht, eine variable zu verwenden, Trennzeichen (ex. print +(split($var, $string))[0] wo $var = ' ') und fand, dass es nicht funktioniert. Was mache ich falsch?

Dank!

BEARBEITEN:
Sorry für die schreckliche Frage. Ich lief gegen eine Zeichenkette mit führenden Leerzeichen und festgestellt, dass die split-Funktion nicht wie die führenden Leerzeichen. Zum Beispiel:

my $var = ' ';
print +(split($var, ' abc ddddd'))[0]
gibt eine leere Ausgabe. Ist $var wird interpretiert als /$var/ innerhalb der split Funktion?

versus

print +(split(' ', ' abc ddddd'))[0]
das gibt eine Leistung von abc

Also wenn ich die Dokumentation Lesen, ich war der Annahme, meine variable als string-literal, wenn es in Wirklichkeit nicht war, und daher die führenden whitespace-Zeichen wurde nicht entfernt.

  • it did not work ist nicht detailliert genug. Erstellen einer ausführbaren Testfall.
  • Funktioniert Prima ... eval.in/240865
  • Jedes mal, wenn Sie eine Frage haben über ein Perl-built-in-Funktionen, empfehle ich Ihnen zu überprüfen perldoc. Wenn es auf Ihrem system installiert haben, können Sie perldoc -f <function> oder in diesem Fall, perldoc -f split (habe ich verlinkt mit der online-version aus Bequemlichkeit). Die Dokumentation ist ausgezeichnet. Ihre Unsicherheit über split mit regex vs. string ist ausführlich erläutert, einschließlich der besonderen Fall von split ' '.
  • Was bedeutet "funktioniert nicht" bedeutet? "funktioniert nicht" ist eine Unzureichende Beschreibung für uns, das problem zu verstehen. Was passiert, wenn du es ausprobiert? Hast du eine Fehlermeldung bekommen? Hast du falsche Ergebnisse? Haben Sie keine Ergebnisse erhalten? Wenn die Ergebnisse falsch waren, was machte Sie falsch? Was hast du erwartet statt? Hast du irgendwelche richtigen Ergebnisse? Wenn ja, welche waren das? Lass uns nicht raten.
  • Da split ' ' wird ein literal space als Trennzeichen, beriefen sich auf den besonderen Fall beschrieben, in die perldoc. $var = ' '; split $var entspricht der split / /, das ist eine regex, split, nicht die gleiche Sache.
InformationsquelleAutor Ryan Foley | 2015-01-09
  1. 7

    Erklärung

    Wenn Sie split auf einer wörtlichen Raum

    split ' '

    Rufen Sie den besonderen Fall beschrieben, in die Dokumentation. Wenn Sie eine variable verwenden

    my $var = ' ';
split $var;

    Ist es das gleiche wie putting, dass die variable innerhalb einer regex:

    split /$var/;

    Diese wird aufgeteilt auf einzelne Leerzeichen, nicht die gleiche Sache. Wenn man zum Beispiel diesen code:

    my $string = "foo bar   baz";
my @literal = split ' ', $string;
my @space = split / /, $string;

    Dann @literal enthalten "foo", "bar", "baz", und @space enthalten "foo", "bar", "", "", "baz" -- leere Felder, wo es aufgeteilt auf die einzelnen Räume.

    Dokumentation

    Dies ist, wie die Dokumentation beschreibt:

    Als ein weiterer Sonderfall, split emuliert die Standard-Verhalten des Befehlszeilen-Tools awk, wenn das MUSTER ist entweder ausgelassen oder einer Zeichenkette bestehend aus einem einzelnen Leerzeichen-Zeichen (wie '' oder "\x20" , aber nicht z.B. //). In diesem Fall werden alle führenden whitespace-Zeichen in EXPR entfernt wird, bevor die Spaltung Auftritt, und das MUSTER ist vielmehr so behandelt, als wenn es /\s+/; das bedeutet insbesondere, dass alle zusammenhängenden Leerzeichen (nicht nur ein einzelnes Leerzeichen) als Trennzeichen verwendet. Jedoch, diese Besondere Behandlung kann vermieden werden, wenn das Muster //statt dem string "" , so dass nur ein einzelnes Leerzeichen ein Trennzeichen. In früheren Perls diesem speziellen Fall wurde eingeschränkt auf die Verwendung von einem einfachen ""als argument pattern split, in Perl 5.18.0 und später in diesem speziellen Fall ist, ausgelöst von beliebiger Ausdruck, der ausgewertet wird, wie der einfache string "" .

    Abhilfe

    Beachten Sie, dass wenn Sie auf der Suche nach einem Weg, um dynamisch zu emulieren, die ' ' aufteilen, indem eine variable, die Sie verwenden könnten /\s+/ statt. Es ist nicht ganz das gleiche, es wird nicht zu entfernen führender Leerzeichen, aber sonst sollte funktionieren wie erwartet.

    • Danke!!! Und die Art und Weise zu verstehen mein Problem genau 🙂
    InformationsquelleAutor TLP
  2. 0

    dein code funktioniert einwandfrei, ich denke

    my $text = "botolo";
my $separator = "o";
print +(split($separator, $text))[0];  
#uglyness with + necessary because Perl

    Obwohl, bei den Kosten für eine zusätzliche Zeile, ich würde eher schreiben, dass die Letzte Zeile wie:

    my @parts = split($separator, $text);
print $parts[0];
    InformationsquelleAutor Walter A. Aprile
Schreibe einen Kommentar