Tag: perl
Perl ist eine prozedurale, high-level -, Mehrzweck -, eine dynamische Programmiersprache, bekannt für seine native Unterstützung für reguläre Ausdrücke und string-parsing-Funktionen. Bitte verwenden Sie dieses tag für Fragen zu Perl im Allgemeinen. Für Dinge, die in Zusammenhang mit dem neuen (aber Verwandte) Sprache „Perl 6“, bitte verwenden Sie die perl6-tag. Für Perl-Stil reguläre Ausdrücke in anderen Sprachen, benutzen Sie den regex-tag, oder, wenn Sie auf der PCRE-Bibliothek, die pcre-tag.
1
Antworten
Auf meinem centos 6.3 server, die ich installiert perl über die yum install perl packager installieren Jedoch während der Installation ExtUtils/Embed über cpan cpan aktualisiert meine Perl v5.17.4 wenn es sein sollte 5.10.1-127 (vermutlich irgendeine Weise über
5
Antworten
Habe ich zwei text-Dateien text1.txt und text2.txt wie unten text1 ac abc abcd abcde text2 ab abc acd abcd Ausgabe ac abcde Brauch ich zum vergleichen von zwei Dateien, und entfernen Sie die Inhalte aus text1 wenn
1
Antworten
Habe ich zwei Ordner php und perl. Sie enthalten index.php und index.pl bzw. Mein Perl-code sieht wie folgt aus: #!/usr/bin/perl use Mysql; print "Content-type: text/html\n\n"; print "<h2>PERL-mySQL Connect</h2>"; print "page info"; $host = "localhost"; $database = "cdcol";
4
Antworten
Menschen halten, gebe mir Beispiele mit Karpfen statt warnen. Warum? Was macht den Karpfen besser als warnen? InformationsquelleAutor Frew Schmidt | 2008-10-09
7
Antworten
Habe ich eine Zeile: $string = 'Paul,12,"soccer,baseball,hockey",white'; Ich bin versuchen zu splitten, diese in @array mit 4 Werten, so print $array[2]; Gibt Fußball,baseball,hockey Wie mache ich das? Hilfe!!! InformationsquelleAutor nebulus | 2011-02-13
2
Antworten
Hatte ich eine Programmier-interview vor paar Tagen, bin ich verpflichtet zu schreiben, ein Stück code in Perl mit Funktionen wie schon im Titel beschrieben, nach einer Weile, kam ich mit der folgenden Lösung: sub startWithUppercaseLetter { return
4
Antworten
Habe ich gearbeitet, auf einige exploit-Entwicklung vor kurzem, um bereit für eine Ausbildung, und ich habe ein problem mit einem tutorial. Ich habe zusammen mit all den tutorials, die ich finden kann, mit Python, im Gegensatz zu
2
Antworten
Arbeite ich an einem einfachen perl-Programm für meine erste Aufgabe in meiner Programmierung Klasse. Ich habe buchstäblich fest gewesen, an diesem ersten Teil für mehr als einen Tag. Ich kann nicht mein Programm, öffnen Sie einfach eine
3
Antworten
Ich brauche einige Hilfe in Bezug auf die arrays in Perl Dies ist der Konstruktor, den ich habe. BuildPacket.Uhr sub new { my $class = shift; my $Packet = { _PacketName => shift, _Platform => shift, _Version
1
Antworten
Ich versuche zu laufen, ein Perl-Skript zu Lesen, eine YAML-Datei, die ich aber immer diese Fehlermeldung. Can't locate YAML/XS.pm in @INC (@INC contains: /Library/Perl/5.12/darwin-thread-multi-2level /Library/Perl/5.12 /Network/Library/Perl/5.12/darwin-thread-multi-2level /Network/Library/Perl/5.12 /Library/Perl/Updates/5.12.3 /System/Library/Perl/5.12/darwin-thread-multi-2level /System/Library/Perl/5.12 /System/Library/Perl/Extras/5.12/darwin-thread-multi-2level /System/Library/Perl/Extras/5.12 .) at Perl-1.pl line 3.
13
Antworten
Müssen wir Lesen und zählen verschiedene Arten von Nachrichten/run einige Statistiken, die eine 10-GB-text-Datei, e.g a FIX Motor log. Wir verwenden Linux, 32-bit, 4 CPUs, Intel, Programmierung in Perl, aber die Sprache spielt eigentlich keine Rolle. Ich
4
Antworten
In Perl, wenn ich will foo() genau das zu tun, was bar() tut, ich kann dies tun: sub foo {return bar(@_);} Gibt es eine bessere Möglichkeit? Etwas näher an Ruby "alias" - operator? Wollen Sie foo() weiterhin
13
Antworten
Als ich fragte diese zuvor ich sollte erwähnt haben, dass es vor allem eine Licht-Gewicht IDE, die ich mir nach, also muss ich nochmal Fragen, wie eine andere Frage stellen. Etwas, das ist nicht nur ein text-editor
1
Antworten
Schrieb ich das folgende Perl-Klasse: package Menu; use strict; my @MENU_ITEMS; my $HEADER = "Pick one of the options below\n"; my $INPUT_REQUEST = "Type your selection: "; sub new { my $self = {}; $self->{ITEM} = undef;
6
Antworten
Habe ich ein kleines Perl-Skript (unter Windows), prüft ein paar Dateien für mich als Hilfe, um mein day-to-day business. Im moment druckt er etwas aus wie... 0% 25% 50% 75% Complete Aber ich kann mich erinnern Skripte,
1
Antworten
Was ist die beste, Perl, Weg, um die ausgewählten Werte eines multiple-select-Feld? <select name="mult" multiple="multiple"> <option value="1">Opt. 1</option> <option value="2">Opt. 2</option> <!-- selected --> <option value="3">Opt. 3</option> <option value="4">Opt. 4</option> <!-- selected --> <option value="5">Opt. 5</option> </select>
6
Antworten
Als üblich, ich bin gerne für CPAN, weil es jetzt alles, was wir brauchen. Wie üblich, ich bin verloren, weil es gibt viel Sachen. Finde ich die core JSON selber, und fühlen begeistert durch eine JSON::Tiny anderen.
6
Antworten
Dies hat offensichtlich zu sein, aber ich bin einfach nicht es zu sehen. Ich habe Dokumente, in denen Tausende von Datensätzen wie unten: Row:1 DATA: [0]37755442 [1]DDG00000010 [2]FALLS [3]IMAGE [4]Defect [5]3 [6]CLOSED Habe ich es geschafft, jeden
2
Antworten
Mein code wie unten use Net::SSH::Expect; my $ssh = Net::SSH::Expect->new ( host => "$node_name", user => 'admin', timeout => 10, raw_pty => 1, ); $ssh->run_ssh() or die "SSH process couldn't start: $!"; $ssh->waitfor('password: '); $ssh->send("$password"); $ssh->waitfor('mml> ');
4
Antworten
Bekomme ich diese seltsame Fehlermeldung beim importieren eines Moduls schrieb ich in mein Tänzer app. Prototype mismatch: sub main::from_json: none vs ($@) at mymodule.pm line 6. Prototype mismatch: sub main::to_json: none vs ($@) at mymodule.pm line 6.
5
Antworten
Danke an alle im Voraus. Ich würde gerne den Zugriff auf die N-te byte eines binären Skalare. Zum Beispiel könnten Sie bekommen alle die Daten der Datei in eine Skalare variable... Vorstellen, dass die binären Daten erhoben
3
Antworten
Ich bin mir bewusst, das viele Fragen in Bezug auf waitpid und timeouts, aber Sie alle befassen sich mit diesem durch die Tötung des Kindes innerhalb einer alarm-handler. Dass ist nicht das, was ich will, ich will,
5
Antworten
Gegeben eine Abfrage, würde ich gerne prüfen, ob dieser enthält einen bestimmten substring (kann mehr als ein Wort) . Aber ich will nicht, erschöpfende Suche, weil diese Teilfolge kann nur gestartet werden, ein frisches Wort. Alle perl-standard-Bibliotheken
1
Antworten
Entwicklungsumgebung von OS X 10.10.3, Perl -v This is perl 5, version 18, subversion 2 (v5.18.2) built for darwin-thread-multi-2level (with 2 registered patches, see perl -V for more detail) Hier ist das problem Zog ich das Projekt
2
Antworten
Ich weiß, dass my wird verwendet, um eine variable deklarieren, die lokal zu einem block oder eine Datei. Ich habe immer angenommen, dass my ist ein Stichwort in Perl. Aber ich wurde nur gesagt, dass es eigentlich
1
Antworten
Ich bin mit AcePerl für das herunterladen von Daten aus dem wormbase.org Datenbank. Bei mir ist der download bestimmter Datenbank-Objekte, die ich bekomme (nach einer bestimmten Anzahl von Objekten) ein segmentation fault. Dieses Verhalten ist reproduzierbar. Hatte
5
Antworten
Problem: ich habe Daten (meist im CSV-format) erzeugt, die auf Windows-und *nix und verarbeitet werden, meistens auf *nix. Windows verwendet CRLF für die Zeilenenden und Unix verwendet LF. Für eine bestimmte Datei, die ich weiß nicht, ob
2
Antworten
#!C:\xampp\apache\bin\httpd.exe $command=`perl -v`; $title = "Perl Version"; print "Content-type: text/html\\n\\n"; print "<html><head><title>$title</title></head><body>"; print " <h1>$title</h1> \n"; print $command; print "</body></html>"; Bekomme ich diesen Fehler: Vorzeitiges Ende der Skript-Header: version.cgi InformationsquelleAutor 3zzy | 2011-07-09
2
Antworten
Habe ich einen Weg, wie diese /home/user/doc/loc Möchte ich extrahieren, home, user, Dok, loc getrennt. Ich habe versucht split (////) und auch split("/") aber keiner von Ihnen arbeitete. Bitte geben Sie mir ein Beispiel-Skript: while (<EXPORT>) {
4
Antworten
Sagen, ich habe eine Zeile, die den folgenden string enthält: "$tom", sagte blash blah blah. "$dick", sagte "bla bla bla". "$harry", sagte blah, blah, blah. und ich will zu extrahieren "$dick", sagte "bla bla bla" Ich habe
2
Antworten
Installierte ich ein CPAN-Modul wie dieses: cpan Acme Gemäß der Ausgabe, wird die installation erfolgreich war: Running install for module 'Acme' ... All tests successful. Files=2, Tests=3, 0 wallclock secs ( 0.02 usr 0.00 sys + 0.04
2
Antworten
$var = pack "C2", 0x20, 0x30; scheint zu funktionieren gut genug, jetzt aber wie spreche ich die einzelnen Elemente des Arrays? Änderungen an Elementen? In-place, wenn möglich. Die pack - /unpack-Semantik sind nicht sehr freundlich. Derzeit bin
3
Antworten
Meiner Liste (@Grad) ist aufgebaut aus einem SQL-Befehl. Die NVL-Befehl in der SQL funktioniert nicht, weder werden tests wie: if (@degree[$i] == "") if (@degree[$i] == " ") if (@degree[$i] == '') if (@degree[$i] == -1) if
9
Antworten
Lassen Sie uns ignorieren für einen moment, Damian Conway ist die beste Praxis von nicht mehr als drei Parameter für jedes Unterprogramm. Ist, gibt es einen Unterschied zwischen den beiden folgenden Beispiele in Bezug auf die Leistung
2
Antworten
Nach der Suche überall im Internet, und ein noob, perl, für die eine Lösung zu diesem habe ich beschlossen, diesen posten auf Stapel. Ich bin auf der Suche zu tun, ist eine Schleife durch array1 mit erforderlichen
3
Antworten
Habe ich ein raw-E-Mail (MIME-multipart), und ich möchte, um dieses auf einer Webseite (z.B. in einem iframe-tabs für den HTML-Teil und den nur-text-Teil, etc.). Gibt es irgendwelche CPAN-Module oder Template::Toolkit-plugins, die ich nutzen kann um mir zu
2
Antworten
Wie kann ich eine Anfrage senden, wie dies in Perl unter Windows? GET /index.html HTTP/1.1 Host: www.example.org Cookie: test=quest InformationsquelleAutor OOO ''MMM'' | 2011-07-01
7
Antworten
Habe ich ein Perl-Programm, dass nutzen muss, die Pakete (die ich auch Schreibe). Einige dieser Pakete sind nur gewählt, Laufzeit (basierend auf einige environment-Variablen). Ich will nicht in meinem code ein "verwenden" - Linie für alle diejenigen
1
Antworten
Lerne ich Perl , sehr neue user . Darf ich wissen, was ist der Unterschied zwischen diesen Perl-codes. #!/usr/bin/perl & #!/usr/bin/perl -w Ich rollte mich wieder Ihr zu Bearbeiten, als es noch nicht üblich, fixieren Sie Ihre
3
Antworten
Ich habe zum speichern von Daten von der Anfrage runned mit Parallel::ForkManager. Aber kommt es nicht in Ordnung, ich meine, ich Umfrage alle ports eines Switches, sondern manche von Ihnen beantworten sich schneller als andere. Also, ich
4
Antworten
Schrieb ich das folgende Perl-Skript. Es wird jedoch nicht gedruckt "1". Ich habe einige der Forschung, und es scheint, dass es ist, weil der IEEE Darstellung Fließkomma-Zahl. Also, gibt es eine bessere Möglichkeit zum Vergleich von floating-point-zahlen
3
Antworten
Ich versuche zu drucken, Fortschritt in % in der Eingabeaufforderung. Aber es funktioniert nicht richtig. Will ich drucken den Fortschritt :: Status 10% Abgeschlossen bei 20% wird es vollständig zeigen Status 20% Abgeschlossen im gleichen Ort, nicht
2
Antworten
Ich normalerweise code admin-Skripts in Python und ich weiß von vielen, dass code, der Ihnen in Perl. Ich war zu investieren einige Zeit auf die Verbesserung meiner Fähigkeiten zur bash-Programmierung. Aber ich Frage mich, ob die Menschen
1
Antworten
Ich versuche, ein Skript schreiben, das Abfragen der LDAP-server und listet alle Gruppen, die ein Benutzer memberOf. Jetzt heißt es nur zurück auf den Eintrag, den der Benutzer memberOf. $sn=$ARGV[0]; $searchbase="OU=All Users,DC=corp,DC=b****n,DC=com"; $filter="(&(sn=$sn)(employeeType=Employee))"; $attrs="sAMAccountName, sn, givenname, l,
3
Antworten
Ich bin mit Perl in Eclipse. Im gleichen Verzeichnis, ich habe einen .pl - Datei und zwei .pm Dateien (pmFile1.Uhr, pmFile2.pm). Oben .pl-Datei verwende ich den Befehl: use pmFile1; use pmFile2; Bekomme ich eine Fehlermeldung Compilation failed
7
Antworten
In meiner Erfahrung, die Sprachen, die das feature unterstützen, können Programme, aufrufen von Funktionen mit benannten Parametern eher als positionelle Parameter sind einfacher zu Lesen und zu verwalten. Ich finde Perl hat dieses feature, aber es funktioniert
3
Antworten
Ich die Installation von Mysql server on Fedora. Wenn Sie diesen Befehl ausführen: [sugumar@localhost softwares]$ rpm -i MySQL-server-5.6.21-1.el6.i686.rpm zeigt es die folgende Fehlermeldung error: Failed dependencies: /usr/bin/perl is needed by MySQL-server-5.6.21-1.el6.i686 Also ich habe Perl installiert: Activeperl
8
Antworten
Also ich muss eine ipv6-Adresse, die möglicherweise oder möglicherweise nicht über eine Maske. Leider kann ich nicht einfach eine Bibliothek zum Parsen der Zeichenfolge. Die bit-Maske ist leicht genug, in diesem Fall: (?:\/\d{1,3})?$/ Der schwierige Teil ist
5
Antworten
Will ich füllen ein web-Formular mit Perl. Ich habe Schwierigkeiten, die Suche nach dem richtigen syntax um dies zu erreichen. Wie, wie komme ich an die URL, wählen Sie das Formular aus, füllen Sie das Formular aus,
2
Antworten
Ich bin dabei einige web-scraping mit Perl-LWP. Ich muss eine Menge verarbeiten von URLs, von denen einige möglicherweise umleiten (1 oder mehr mal). Wie bekomme ich die ultimative URL mit alle Umleitungen gelöst, mit Hilfe von HEAD-Methode?