Perlscript aus perlscript aufrufen (Allgemeines zu Perl)

[thread]16082[/thread]

Perlscript aus perlscript aufrufen

Leser: 21

Articles: hide open all | hide show old branches

+4 replies
Gast Marc

2011-03-17 15:13

Hallo,
ich habe mehrere subs, die ich verschiedenen scripts brauche, so dass ich aus jeder sub ein eigenes Perlscript machen wollte. Dieses muss ich ja dann in den anderen Scripts aufrufen.
Gefunden habe ich nur, dass dieses über system meinscript.pl 1 2 3 geht.

Ist das die einzige Möglichkeit, v. a. wegen der Rückgabe Werte gibts ja da Schwierigkeiten.
Last edited: 2011-03-17 15:25:52 +0100 (CET)
- Linuxer
  
  2011-03-17 15:44
  User since
  2006-01-27
  3872 Artikel
  HausmeisterIn
  Du könntest die Subroutinen in ein Modul auslagern und dieses Modul in den verschiedenen Skripten einbinden.
  
  Beispiel:
  
  Dein Modul mit Sub-Routinen... Im Array @EXPORT_OK werden die Namen der zu exportierenden Subroutinen definieren.
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
  
  package MyHelpers; use strict; use warnings; use base qw(Exporter); our @EXPORT_OK = qw( foo bar ); sub foo { return "foo"; } sub bar { return "bar"; } 1;
  
  Im Skript bindest Du dann das Modul ein und importierst explizit die benötigten Routinen:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  #! /usr/bin/perl use strict; use warnings; use MyHelpers qw( foo ); print foo();
  
  http://perldoc.perl.org/perlmod.html
  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
- Gast wer
  
  2011-03-17 15:47
  Du willst ein Modul schreiben. Das ist in dem Sinne kein Script.
  Cpan ist voll davon :-)
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  package mein_test; use strict; use warnngs; sub machwas { print "OK\n"; } 1;
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  #!/usr/bin/perl use strct; use warnings; use mein_test; mein_test::machwas();
  
  mehr:
  perlnewmod
  perlmodlib
  perlmodstyle
  Exporter
  Last edited: 2011-03-17 16:15:29 +0100 (CET)
  - Linuxer
    
    2011-03-17 16:45
    
    User since
    2006-01-27
    3872 Artikel
    HausmeisterIn
    
    Sehr schön. Hatte überlegt, diese Variante auch nochmal zu schreiben. Das hast Du mir erspart.
    Und ein ++ für die Doku-Liste.
    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!

View all threads created 2011-03-17 15:13.