Suchergebnisse für Anfrage "perl"
So konvertieren Sie die Perl-Hash-String-Referenz in eine Perl-Hash-Referenz
HASH(0x991f0dc)So wird die obige Hash-Referenz als String in einer skalaren Variablen gespeichert. Wenn wir sie mit "%" im Perl-Programm dereferenzieren, wird ein Fehler ausgegeben. Can't use string ("HASH(0x991f0dc) ") as a HASH ref while ...
Wie verwende ich eine Variable auf der Ersetzungsseite des Perl-Ersetzungsoperators?
Ich möchte Folgendes tun: $find="start (.*) end"; $replace="foo \1 bar"; $var = "start middle end"; $var =~ s/$find/$replace/; Ich würde erwarten, dass $ var "foo middle bar" enthält, aber es funktioniert nicht. Auch nicht $replace='foo \1 ...
Finden fehlender Nummern in einer Liste in Perl
Zum Beispiel möchte ich bei (1, 2, 5, 6, 7) feststellen, dass 3 und 4 fehlen? Ich habe folgenden Code gefunden, der mein Ziel erreicht. #!/usr/bin/perl use Data::Dumper; @list= (1,2,5,6,7); @missing = map $list[$_-1]+1..$list[$_]-1, ...
Wie ersetze ich in Perl durch einen ausgewerteten Ausdruck?
Es gibt eine Datei dummy.txt Der Inhalt ist: 9/0/2010 9/2/2010 10/11/2010Ich muss den Monatsteil (0,2,11) in +1 ändern, dh (1,3,12) Ich habe den Substitutions-Regex wie folgt geschrieben $line =~ s/\/(\d+)\//\/\1+1\//; Es wird ...
Wie schnell ist Perls Smartmatch-Operator bei der Suche nach einem Skalar in einem Array?
Ich möchte wiederholt nach Werten in einem Array suchen, das sich nicht ändert. So weit habe ich es so gemacht: Ich habe die Werte in einen Hash gesetzt (also habe ich ein Array und einen Hash mit im Wesentlichen dem gleichen Inhalt) und ich ...
perl Subroutine gibt Array und Str zurück, aber sie werden zusammengeführt
sub process_feed { my ($line) = @_; my @lines; my $last_received = ""; while (1) { if ($line =~/^{(.*?)}(.*)/) { push @lines, $1; $line = $2; } else { $last_received = $line; last; } } print "sending back @lines, $last_received\n"; return ...
DBI-Datenbankhandle, bei dem AutoCommit auf 0 gesetzt ist und bei SELECT? @ Keine korrekten Daten zurückgegeben werd
Dies ist schwierig zu erklären (und sehr seltsam), also nimm es mit mir. Ich werde das Problem und die Lösung dafür erklären, aber ich würde gerne sehen, ob jemand erklären kann, warum es so funktioniert, wie es funktioniert:) Ich habe eine ...
Wie kann ich ein Array filtern, ohne eine Schleife in Perl zu verwenden?
Hier versuche ich nur die Elemente zu filtern, die keinen Teilstring habenworld und speichern Sie die Ergebnisse im selben Array. Was ist der richtige Weg, um dies in Perl zu tun? $ cat test.pl use strict; use warnings; my @arr = ('hello 1', ...
XML vs YAML vs JSON
Angenommen, ich starte ein Projekt von Grund auf neu, das von keinem anderen Projekt abhängig ist. Ich möchte ein Format zum Speichern von Feeds verwenden, etwa XML. Da XML nicht das einzige verfügbare Format dieser Art ist, möchte ich wissen: ...
Ungerade Anzahl von Elementen in der Hash-Zuordnung mit dem Standardwert
Gruß Liebe Community. Ich versuche ein @ zu machsub in Perl, das einen Hash und ein Debug-Flag benötigt, das standardmäßig Null ist. Allerdings bekomme ich immer diesen FehlerOdd number of elements in hash assignment. Wenn ich das Debug-Flag ...