Suchergebnisse für Anfrage "perl"

1 die antwort

Warum ist eine große Schleife in einer kleinen Schleife schneller als eine kleine Schleife in einer großen Schleife?

Dies ist mein Perl-Code $big=10_000_000; #A:big loop outside my $begin_time = time; foreach my $i (1..$big) { foreach my $p (1..10){ } } my $end_time = time; my $t1=$end_time-$begin_time; #B:small loop outside my $begin_time = time; foreach my ...

1 die antwort

Wie kann ich mit Hash-Schlüsseln umgehen, die unzulässige Bezeichnerzeichen im Template Toolkit enthalten?

Wenn ich im Template Toolkit die folgende Variable habe, die eine Hashref enthält: [% artist = { 'life-span' => '1975 to 1987', } %]Was ist der beste Weg, um die Daten in "Lebensdauer" auszugeben? Ich habe versucht... [% artist.life-span %]^ ...

6 die antwort

Sind MooseX :: Declare und MooseX :: Method :: Signatures produktionsbereit?

Von demaktuelle Version (0.98) [http://search.cpan.org/~drolsky/Moose-0.98/lib/Moose/Manual/MooseX.pod]desMoose :: Manual :: MooseX [http://search.cpan.org/perldoc/Moose::Manual::MooseX]sind die Zeilen: Wir haben große Hoffnungen auf die Zukunft ...

TOP-Veröffentlichungen

3 die antwort

Ist es möglich, ein Perl-Skript zu verwenden oder zu benötigen, ohne dessen Anweisungen auszuführen?

Ich muss einigen alten Skripten Unit-Tests hinzufügen, die Skripten haben im Grunde alle die folgende Form: #!/usr/bin/perl # Main code foo(); bar(); # subs sub foo { } sub bar { }Wenn ich versuche, diesen Code in einem Komponententest zu ...

2 die antwort

Verhindern, dass Zeichenfolgen als Dateihandle interpretiert werden

Perl verfügt über die Funktion, dass Zeichenfolgen mit dem Namen eines Dateihandles angesprochen werdenSein ein Dateihandle: # let this be some nice class I wrote package Input { sub awesome { ... } }Also, wenn wir das tunInput->awesome oder ...

2 die antwort

'use warnings' vs. '#! / usr / bin / perl -w' Gibt es einen Unterschied?

Ich lese in einem Forum ( http://forums.devshed.com/perl-programming-6/email-send-attach-950337.html [http://forums.devshed.com/perl-programming-6/email-send-attach-950337.html]*) dass es besser war, "Warnungen zu verwenden"; anstatt '-w' zu ...

4 die antwort

Warum kann ich den Wert einer Perl-Variablen nicht verwenden, um auf einen lexikalischen Variablennamen zuzugreifen?

Warum druckt das 42: $answer = 42; $variable = "answer"; print ${$variable} . "\n";aber das tut nicht: my $answer = 42; my $variable = "answer"; print ${$variable} . "\n";

1 die antwort

Warum wird das letzte Oktett wiederholt, wenn mein Perl-Programm eine UTF-8-codierte Zeichenfolge in cmd.exe ausgibt?

AktualisierenWie von @ikegami vorgeschlagen, habe ich dies als Fehler gemeldet. Fehler # 121783 für perl5: Windows: UTF-8-codierte Ausgabe in cmd.exe mit Codepage 65001 führt zu unerwarteter ...

3 die antwort

Wie kann ich diesen Fall der „unbrauchbaren Verwendung einer Variablen in einem ungültigen Kontext“ lösen?

Wie kann ich diesen Fall der "unbrauchbaren Verwendung einer Variablen in einem ungültigen Kontext" lösen? Zum Beispiel: my $err = $soap_response->code, " ", $soap_response->string, "\n"; return $err; Ich erhalte Warnungen wie "Nutzlose ...

3 die antwort

Warum sieht mein Elternprozess die Ausgabe des Kindes nicht, bis es beendet wird?

Betrachten Sie das folgende Skript: use IO::File; $| = 1; my ($handle, $pid) = myPipe(); if ($pid == 0) { print "$$"; sleep 5; exit; } print "child: ".<$handle>."\n"; sub myPipe { my $handle = new IO::File(); my $pid = open($handle, "-|"); ...