Wenn ich das folgende Array in Perl habe: @x = qw(a b c); und ich iteriere darüber mit foreach, dann $_verweise ich auf das aktuelle Element im Array: foreach (@x) { print; } wird drucken: abc Gibt es eine ähnliche Möglichkeit, den Index des aktuellen Elements abzurufen, ohne einen...
Wie schlafe ich in Perl kürzer als eine Sekunde?
Der Konsens der Perl-Community scheint zu sein, dass dies Try::Tinyder bevorzugte Weg ist, um mit Ausnahmen umzugehen. Perl 5.14 (die Version, die ich verwende) scheint die Probleme mit evaldiesen Try::TinyAdressen zu lösen . Wird es Try::Tinymir noch Vorteile bringen?
Beim Versuch, eine Verbindung über DBI herzustellen, wird folgende Fehlermeldung angezeigt DBI-Verbindung ('Datenbank = ChaosLRdb; Host = 192.168.0.1; Port = 5433', 'Postgres', ...) fehlgeschlagen: FATAL: Kein pg_hba.conf-Eintrag für Host "192.168.0.1", Benutzer "postgres", Datenbank "ChaosLRdb",...
Wie aktiviere ich das automatische Falten in Vim? set foldmethod=syntaxscheint nicht viel von irgendetwas zu tun.
Ich suche nach dem Vorhandensein eines Elements in einer Liste. In Python gibt es ein inSchlüsselwort und ich würde so etwas tun: if element in list: doTask Gibt es in Perl etwas Äquivalentes, ohne die gesamte Liste manuell durchlaufen zu müssen?
Was ist der einfachste Weg, um programmgesteuert aus stdin oder einer Eingabedatei (falls vorhanden) in Perl zu lesen?
Es ist unwahrscheinlich, dass diese Frage zukünftigen Besuchern hilft. Es ist nur für ein kleines geografisches Gebiet, einen bestimmten Zeitpunkt oder eine außerordentlich enge Situation relevant, die für das weltweite Internetpublikum nicht allgemein anwendbar ist. Wenn Sie Hilfe benötigen, um...
Ich habe eine Datei mit vielen Zeilen in jeder Zeile. Es gibt viele Spalten (Felder), die durch Leerzeichen getrennt sind. Die Anzahl der Spalten in jeder Zeile ist unterschiedlich. Ich möchte die ersten beiden Spalten entfernen. Wie geht das?
Ich habe die Aufgabe, eine Produktionsumgebung zu replizieren, um viele Test- / Sitzumgebungen zu erstellen. Eines der Dinge, die ich tun muss, ist, Perl mit allen Modulen aufzubauen, die im Laufe der Jahre installiert wurden (einschließlich interner und externer Module). Ich könnte einfach das...
Es stehen mehrere Installationsprogramme für cpan-Module zur Verfügung. Ich kenne mindestens CPAN.pm (wird mit Perl geliefert), CPANPLUS und cpanminus. Was ist der Unterschied zwischen den drei? Welche Situationen erfordern die Verwendung übereinander? Gibt es andere Modulinstallationsprogramme,...
Ich habe Perl noch nie benutzt, aber ich bin wirklich beeindruckt von der Bestätigung , die ich für die Suche nach Quellcode usw. verwenden möchte. Kann mir jemand zeigen, wie ich diese hervorragende Bibliothek unter Windows nutzen kann?
Nehmen wir etwas sehr Einfaches, # Foo.pm package Foo { my $baz = bar(); sub bar { 42 }; ## Overwrite this print $baz; ## Before this is executed } Gibt es überhaupt eine Möglichkeit, test.plCode auszuführen, der die $bazEinstellungen ändert und dazu führt Foo.pm, dass etwas anderes auf dem...
Wenn Type::Tinyich mir Type::Tiny->newdas ansehe, sehe ich, dass der Klassenname im Aufruf von in den offiziellen Dokumenten zitiert wird. my $NUM = "Type::Tiny"->new( name => "Number", constraint => sub { looks_like_number($_) }, message => sub { "$_ ain't a number"...
$ perl -pe 1 foo && echo ok Can't open foo: No such file or directory. ok Ich möchte wirklich, dass das Perl-Skript fehlschlägt, wenn die Datei nicht vorhanden ist. Was ist der "richtige" Weg, um -p oder -n zum Fehlschlagen zu bringen, wenn die Eingabedatei nicht vorhanden...
Ich bin gespannt auf Raku (Perl 6) und seine Syntax. Ich habe Perl 5 bereits auf meinem Ubuntu-Computer installiert. vinod@ubuntu-s-1vcpu-1gb-nyc1-01:~$ perl -v This is perl 5, version 26, subversion 1 (v5.26.1) built for x86_64-linux-gnu-thread-multi (with 67 registered patches, see perl -V for...
Ich führe die folgenden erwarteten Rückgabezeichenfolgen mit 5 Zeichen aus: while (glob '{a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z}'x5) { print "$_\n"; } Es werden jedoch nur 4 Zeichen zurückgegeben: anbc anbd anbe anbf anbg ... Wenn ich jedoch die Anzahl der Zeichen in der Liste...
In Perl 5 können Sie wc -lmit Oneliner emulieren : perl -lnE 'END {say $.}' test.txt So implementieren Sie diese Funktionalität auf Raku Wenn Sie versuchen, dies zu implementieren: raku -e 'say "test.txt".IO.open.lines.elems' es stellt sich als langsam heraus und verbraucht viel Speicher...
Ist es möglich , einen regulären Ausdruck drucken erweiterte Notation erstellt ( qr/.../x) in nicht expandierter Form? Zum Beispiel: my $decimal = qr/ (?=\d|\.\d) # look-ahead to ensure at least one of the optional parts matches \d* # optional whole digits (?:\.\d*)? # optional decimal point and...
Ich habe das CPAN Perl-Modul Data :: Printer (DP) mit Perl verwendet. Es funktioniert großartig. Jetzt möchte ich es im Raku-Code verwenden. Wenn ich die :from<Perl5>Funktion zum Importieren verwende und dann Code damit ausführe, wird die Anmerkung (tied to Perl6::Hash)an die Anzeige von...