Sichtbarkeit von Modulen (gelöst) (Fragen zu Perl-Modulen)

[thread]18368[/thread]

Sichtbarkeit von Modulen [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 19

Articles: hide open all | hide show old branches

+4 replies
silver345

2013-06-06 14:58

User since
2011-06-07
16 Artikel
BenutzerIn

Hey zusammen,

ich passe gerade ein Perl-Script an Windows an (strawberry perl). Dieses Progrämmchen lief bisher unter Linux. In diesem Zusammenhang muß ich gleich Getopt::Tiny rausoptimieren, da es dafür keine Windows-Implementierung gibt. Ich nutze jetzt Getopt::Std und Getopt::Long. Aus einem Beispiel habe ich Code übernommen. Unter anderem nach dem use-Abschnitt eine Zeile

MAIN:

Wenn ich diese Zeile verwende, werden eigene Module, die in einem Unterordner neben dem eigentlichen Script liegen, nicht mehr gefunden. In @INC ist aber . eingetragen. Nach meiner Meinung sollte Perl dann doch auch dort suchen. Muß ich die Module dann anders einbinden (passiert im Moment mit use My::Subs)? Oder müssen die Module unter perl/lib kopiert werden?

Vielen Dank schon mal im Voraus für eventuelle Antworten.
- +3 replies
- Linuxer
  
  2013-06-06 15:56
  User since
  2006-01-27
  3890 Artikel
  HausmeisterIn
  Hi,
  
  recht dünne Informationsbasis. Ich kann Dein Problem nicht nachvollziehen; Testcode:
  
  # My\Subs.pm
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12
  
  package My::Subs; use strict; use warnings; use Exporter qw( import ); our @EXPORT = qw( foo ); use 5.12.0; sub foo { say "I am foo of ", __PACKAGE__; }
  
  # mysubs.pl
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8
  
  #! /usr/bin/perl use strict; use warnings; use My::Subs; MAIN: foo();
  
  # Resultat:
  
  Code: (dl )
  
  1 2
  
  X:\temp>perl mysubs.pl I am foo of My::Subs
  
  "MAIN:" ist ein (mit der momentanen Informationsbasis IMHO sinnfreies) Label, das keinen Einfluss auf @INC oder Modulsichtbarkeiten haben sollte.
  Würde man relevanten Code (am Stück) und die entsprechende Fehlermeldung sehen, könnte man vielleicht besser raten, aber so nicht.
  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
  - silver345
    
    2013-06-07 07:54
    
    User since
    2011-06-07
    16 Artikel
    BenutzerIn
    
    Sorry, aber das Problem lag wohl doch an irgend welchen fehlenden Klammern.
    
    Script läuft. Auch unter Windows
    
    Vielen Dank für die schnelle Antwort und nix für ungut.
    - bianca
      
      2013-06-07 08:47
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      2013-06-07T05:54:19 silver345
      Sorry, aber das Problem lag wohl doch an irgend welchen fehlenden Klammern.
      
      Das sollte man aber angezeigt bekommen, wenn man das Script vorher in der DOS-Box mit perl -c scriptname.pl überprüft. Kann ich nur wärmstens empfehlen, man verbrät sonst unnötige Zeit mit der Suche nach Fehlern.
      Außerdem immer use strict; und use warnings; an den Anfang des Scripts unter die Shebang Zeile! Das erspart eine Menge Ärger.
      10 print "Hallo"
      20 goto 10

View all threads created 2013-06-06 14:58.