Perl-Prog funktioniert mal und mal nicht (solved) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-10-13 13:54:22
Europe/Berlin
Login (Register)
- Preferences
- Statistics
Jemand zu Hause?
1 user online

[thread]18358[/thread]

submit to reddit

Perl-Prog funktioniert mal und mal nicht [solved]

[solved]

Tags: perl5 Similar Threads

Readers: 17

Articles: hide open all | hide show old branches

Subtrees:
Version des Moduls anzeigen (6 articles) 2013-06-04 13:56
Lösung (0 articles) 2013-06-04 15:09

+24 replies
Eng1958

2013-06-04 11:21
User since
2013-06-04
37 articles
BenutzerIn
Guten Morgen,

hat jemand eine Idee, warum der folgende Aufruf einmal funktioniert und einmal nicht.
Code: (dl )

1 2 3

C:\My\Work\Perl\getopt>\perl\bin\perl getopt-01.pl -a -b Test a exists b = Test
Code: (dl )

C:\My\Work\Perl\getopt>getopt-01.pl -a -b Test
Das Programm:
Code: (dl )

1 2 3 4

use Getopt::Std; getopts ("ab:"); print "a exists\n" if $opt_a; print "b = $opt_b\n" if $opt_b;
perl wird im Verzeichnis "C:\My\Work\Perl\getopt" gefunden.
Code: (dl )

1 2 3 4 5 6 7 8 9

C:\My\Work\Perl\getopt>perl -v This is perl 5, version 16, subversion 2 (v5.16.2) built for MSWin32-x86-multi-thread (with 1 registered patch, see perl -V for more detail) Copyright 1987-2012, Larry Wall Binary build 1602 [296513] provided by ActiveState http://www.ActiveState.com Built Dec 19 2012 12:35:59
Ich verstehe es nicht, irgendwo muss etwas fehlen, habe aber keine Idee, was es sein könnte.

Danke und Gruß
Eng1958

modedit Editiert von pq: code-tags statt quote-tags
Last edited: 2013-06-04 11:41:26 +0200 (CEST)
- +3 replies
- Linuxer
  
  2013-06-04 11:32
  
  User since
  2006-01-27
  3890 articles
  HausmeisterIn
  
  Erster Gedanke: zwei verschiedene Perl-Versionen installiert?
  Beim ersten Aufruf gibst Du den Interpreter vor, beim zweiten muss Windows entscheiden, welcher (mit .pl verknüpft ist und) benutzt wird.
  
  Warum es beim zweiten dann aber keine Ausgabe gibt, lässt sich so schwer raten.
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
  - +2 replies
  - payx
    
    2013-06-04 11:50
    
    User since
    2006-05-04
    564 articles
    BenutzerIn
    
    2013-06-04T09:32:47 Linuxer
    Erster Gedanke: zwei verschiedene Perl-Versionen installiert?
    Beim ersten Aufruf gibst Du den Interpreter vor, beim zweiten muss Windows entscheiden, welcher (mit .pl verknüpft ist und) benutzt wird.
    
    Ja, oder mit .pl ist vielleicht gar kein Perl-Interpreter verknüpft, sondern z.B. ein Editor. Dann kann es sein, dass einfach nichts passiert, wenn nämlich die Datei bereits im Editor geöffnet ist und der Editor bereits im Vordergrund ist.
    
    Genau so läuft es bei mir, wenn ich vor dem Scriptnamen perl vergesse.
    
    HTH
    Grüße
    payx
    - Linuxer
      
      2013-06-04 13:06
      
      User since
      2006-01-27
      3890 articles
      HausmeisterIn
      
      Gute Idee, ist auch eine Variante.
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- +3 replies
- GwenDragon
  
  2013-06-04 11:44
  
  User since
  2005-01-17
  14741 articles
  Admin1
  
  Quote
  hat jemand eine Idee, warum der folgende Aufruf einmal funktioniert und einmal nicht.
  Was wird denn angezeigt, wenn du nur getopt-01.pl -a -b Test eingibst?
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - Eng1958
    
    2013-06-04 11:47
    User since
    2013-06-04
    37 articles
    BenutzerIn
    
    Code: (dl )
    
    Was wird denn angezeigt, wenn du nur getopt-01.pl -a -b Test eingibst?
    
    Wie im Posting versucht zu zeigen (wie zeige ich nichts?), es wird nichts angezeigt. Dies ist schlimmer als jede Fehlermeldung
    - payx
      
      2013-06-04 12:08
      
      User since
      2006-05-04
      564 articles
      BenutzerIn
      
      Und wenn Du im Windows-Explorer auf die Datei getopt-01.pl doppelklickst?
- pq
  
  2013-06-04 11:48
  
  User since
  2003-08-04
  12208 articles
  Admin1
  
  mit was ist denn die dateiendung pl verknüpft? mir scheint, perl wird gar nicht erst aufgerufen.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- +8 replies
- GwenDragon
  
  2013-06-04 11:52
  
  User since
  2005-01-17
  14741 articles
  Admin1
  
  Was zeigt denn
  assoc .pl
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +7 replies
  - payx
    
    2013-06-04 12:06
    
    User since
    2006-05-04
    564 articles
    BenutzerIn
    
    Hallo GwenDragon,
    
    bei mir kommt: Dateizuordnung für die Erweiterung .pl nicht gefunden.
    
    Tatsächlich öffnet sich aber (bei Doppelklick auf eine .pl-Datei oder bei Aufruf aus der Konsole) mein Editor (notepad++).
    
    Windows-magic.
    
    Grüße
    payx
    - +6 replies
    - Eng1958
      
      2013-06-04 12:20
      
      User since
      2013-06-04
      37 articles
      BenutzerIn
      
      Zuordnung sollte korrekt sein;
      
      Code: (dl )
      
      1 2
      
      C:\My\Work\Perl\getopt>assoc .pl .pl=Perl
      
      Registry:
      
      Code: (dl )
      
      "C:\Perl\bin\perl.exe" "%1" %*
      
      Zusätzliches print am Ende des perl-Programmes
      
      Code: (dl )
      
      1 2
      
      C:\My\Work\Perl\getopt>getopt-01.pl -a -b Test end of perl
      
      also sollte der perl-Interpeter laufen
      
      Mein Eindruck ist, dass "getopt::Std" nicht korrekt arbeitet und aus diesem Grunde die Übergabeparameter nicht korrekt in $opt_a und $opt_b eingetragen werden.
      
      Gruß
      Eng1958
      Last edited: 2013-06-04 12:21:24 +0200 (CEST)
      - +5 replies
      - pq
        
        2013-06-04 12:26
        
        User since
        2003-08-04
        12208 articles
        Admin1
        
        na das lässt sich doch einfach überprüfen, ob getopt korrekt arbeitet. bekommt getopt denn die richtigen parameter?
        wo die sind? in @ARGV. gib @ARGV aus.
        
        Code (perl): (dl )
        
        1 2
        
        use Data::Dumper; print Dumper \@ARGV;
        
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +4 replies
        
        Eng1958
        
        2013-06-04 12:47
        
        User since
        2013-06-04
        37 articles
        BenutzerIn
        
        Es ist anscheinend tatsächlich so, dass nicht übergeben wird.
        
        Code: (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
        
        C:\My\Work\Perl\getopt>getopt-01.pl -a -b Test C:/Perl/site/lib C:/Perl/lib . $VAR1 = []; end of perl C:\My\Work\Perl\getopt>/perl/bin/perl getopt-01.pl -a -b Test C:/Perl/site/lib C:/Perl/lib . $VAR1 = [ '-a', '-b', 'Test' ]; a exists b = Test end of perl
        
        Meine Version von getopt und perl
        
        Code: (dl )
        
        1 2 3 4 5 6
        
        C:\My\Work\Perl\getopt>perl -MGetopt::Std -E "say $Getopt::Std::VERSION" 1.07 This is perl 5, version 16, subversion 2 (v5.16.2) built for MSWin32-x86-multi-thread (with 1 registered patch, see perl -V for more detail)
        
        Oder Windows (in meinem Fall W-Vista/32) übergibt keine Argumente !!??
        
        Ich probiere es mal mit einer Neuinstallation.
        Last edited: 2013-06-04 13:02:12 +0200 (CEST)
        
        pq
        
        2013-06-04 13:01
        
        User since
        2003-08-04
        12208 articles
        Admin1
        
        ich vermute, dann ist einfach die verknüpfung falsch angegeben, aber da kann ich nicht weiterhelfen, habe kein windows.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +2 replies
        
        pq
        
        2013-06-04 13:03
        
        User since
        2003-08-04
        12208 articles
        Admin1
        
        hier ein ähnlicher fall: http://stackoverflow.com/questions/1695188/how-do-...
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        Eng1958
        
        2013-06-04 13:20
        
        Subtree with 1 replies: Lösung
        
        User since
        2013-06-04
        37 articles
        BenutzerIn
        
        Das war's. Vielen Dank.
        Auch mir mir war ein Registry-Eintrag nicht korrekt
        
        bad: "C:\Perl\bin\perl.exe" "%1"
        good: "C:\Perl\bin\perl.exe" "%1" %*
        
        %* ist natürlich für die Parameter da.
        
        Vielen Dank.
        
        BTW: Eine Neuinstallation hat keinen Erfolg gehabt, erst die anschließende manuelle Registry-Änderung.
        Ich kann jetzt leider nicht sagen, ob dies schon immer so war oder erst irgendwann aufgetreten ist.
        
        Gruß
        Eng1958
        Last edited: 2013-06-04 15:09:27 +0200 (CEST)
- GwenDragon
  
  2013-06-04 12:24
  
  Subtree with 7 replies: Version des Moduls anzeigen
  
  User since
  2005-01-17
  14741 articles
  Admin1
  
  In Strawberry Perl 5.16.3.1 (32bit) auf Win 7 x64 klappts.
  Getopt::Std hat da Version 1.07.
  
  Anzeigen kannst du die Version mit:
  perl -MGetopt::Std -E "say $Getopt::Std::VERSION"
  Last edited: 2013-06-04 13:26:07 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- GwenDragon
  
  2013-06-04 12:30
  
  User since
  2005-01-17
  14741 articles
  Admin1
  
  Vielleicht installierst du dir ein aktuelles ActiveState Perl der Version 5.16.3.1603 siehe AS Downloads.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2013-06-04 11:21.