Suchergebnisse für Anfrage "perl"
Wie kann ich eine Zeichenfolge zwischen übereinstimmenden geschweiften Klammern in Perl extrahieren?
Meine Eingabedatei ist wie folgt: HEADER {ABC|*|DEF {GHI 0 1 0} {{Points {}}}} {ABC|*|DEF {GHI 0 2 0} {{Points {}}}} {ABC|*|XYZ:abc:def {GHI 0 22 0} {{Points {{F1 1.1} {F2 1.2} {F3 1.3} {F4 1.4}}}}} {ABC|*|XYZ:ghi:jkl {JKL 0 372 0} {{Points ...
Beeinflussen Kommentare die Perl-Leistung?
Ich optimiere einige häufig ausgeführte Perl-Codes (einmal pro Tag pro Datei). Kommentare verlangsamen Perl-Skripte? Meine Experimente neigen zu no: use Benchmark; timethese(20000000, { 'comments' => '$b=1; # comment ... (100 times) ', ...
Wie kann ich schnell alle Zahlen in einer Datei zusammenfassen?
Ich habe eine Datei, die mehrere tausend Zahlen enthält, jede in einer eigenen Zeile: 34 42 11 6 2 99 ... Ich möchte ein Skript schreiben, das die Summe aller Zahlen in der Datei ausgibt. Ich habe eine Lösung, aber sie ist nicht sehr ...
So berechnen Sie ein Datum vor einer Woche von heute
Ich möchte das Datum von heute vor einer Woche mit einem bestimmten Format berechnen und in eine Variable einfügen. Zum Beispiel ist heuteNov 21st. 2014, und ich möchte ausdrucken: Letzte Woche ist2014-11-14. Ich weiß, wir können @ ...
Regex passend zu mehreren negativen Lookahead
Ich versuche, einen String (unter Verwendung eines Perl-Regex) nur dann zu finden, wenn er nicht mit "abc:" oder "defg:" beginnt, aber ich kann anscheinend nicht herausfinden, wie. Ich habe versucht, so etwas wie ^(?:(?!abc:)|(?!defg:))
Gemeinsame Variablen in mehreren Skripten definieren?
Ich habe eine Reihe von Bash- und Perl-Skripten, die in ihrer Funktionalität unabhängig sind, sich jedoch darauf beziehen, dass sie innerhalb desselben Projekts funktionieren. Die Tatsache, dass sie im selben Projekt arbeiten, bedeutet, dass ich ...
Wie teile ich chinesische Zeichen nacheinander auf?
Wenn es kein Sonderzeichen gibt (zBwhite space, : etc) zwischen vorname und nachname. So teilen Sie die chinesischen Schriftzeichen unten auf. use strict; use warnings; use Data::Dumper; my $fh = \*DATA; my $fname; # 小三； my $lname; # 张 ； ...
Warum ist der Exit-Code in Perl 255 statt -1?
Warum ist es so, dass ich, wenn ich den Exit-Code in Perl um acht verschiebe, 255 erhalte, wenn ich erwarte, dass er -1 ist?
Was ist der Unterschied zwischen "$ this", "@ that" und "% those" in Perl?
Was ist der Unterschied zwischen$this, @that, und%those in Perl?
Wie bekomme ich die Größe des Arrays in Bytes in Perl?
Ich muss die Größe des Arrays in Perl ermitteln, aber die Größe muss in Bytes angegeben werden. Ich kann keine Funktion dafür finden. Danke im Vorau