Tutorial für Module (Fragen zu Perl-Modulen)

[thread]18002[/thread]

Tutorial für Module

Tags: perl5 modul schreiben Ähnliche Threads

Leser: 27

Articles: hide open all | hide show old branches

+12 replies
bianca

2012-12-20 12:51
User since
2009-09-13
7016 Artikel
BenutzerIn
Hi!
Angenommen, ich wollte ein Modul schreiben, das man später auf CPAN zur Verfügung stellen wollte. Was muss man dafür alles beachten? Gibt es ein Tutorial? Insbesondere die Fragen
- Syntax beim Export von Funktionsnamen
- Syntax zur Definition von Prerequieries
- Generelle Syntax und Aufbau des Codes

Ich würde das gern mal mit einem Beispiel testen, wo der Code die Prüfziffer einer SEPA-Gläubiger ID berechnet. Möchte also im Modul sagen, dass Math::BigFloat benötigt wird und dann dem use'enden Script die Funktion Modulname::berechne_id zur Verfügung stellen.
Wie würde sowas aussehen?
Das ist im Moment der dafür benötigte Codeausschnitt:
Code (perl): (dl )

1 2

my $wert = Math::BigFloat->new($konto.'131400'); return sprintf('%02d',98 - ($wert->bmod(97)));
10 print "Hallo"
20 goto 10
- GwenDragon
  
  2012-12-20 13:27
  
  User since
  2005-01-17
  14746 Artikel
  Admin1
  
  Modulgerüste lassen sich mit h2xs, Makemaker oder Module-Starter erstellen.
  
  Ansonsten Module erstellen:
  FaqModule
  http://search.cpan.org/perldoc?perlmodstyle
  http://search.cpan.org/perldoc?perlnewmod
  http://www.bitbetrieb.de/blog/cpan_modul_erstellen...
  http://www.dagolden.com/index.php/1173/what-tools-...
  http://www.perlmonks.org/?node_id=879515
  http://www.perlmonks.org/index.pl?node_id=102347
  http://www.perlmonks.org/index.pl?node_id=158999
  http://www.perlmonks.org/?node_id=431702
  http://bratislava.pm.org/en/tutorial/new-module.ht...
  http://springfield.pm.org/meetings/modules.html
  http://www.cpan.org/modules/04pause.html
  http://search.cpan.org/~jkeenan/ExtUtils-ModuleMak...
  http://search.cpan.org/~xsawyerx/Module-Starter-1....
  
  //EDIT: Liste ergänzt
  Last edited: 2012-12-20 14:42:56 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- GwenDragon
  
  2012-12-20 14:26
  User since
  2005-01-17
  14746 Artikel
  Admin1
  2012-12-20T11:51:14 bianca
  Insbesondere die Fragen
  - Syntax beim Export von Funktionsnamen
  - Syntax zur Definition von Prerequieries
  - Generelle Syntax und Aufbau des Codes
  
  Ich versuche mal -- bin keine gute Lehrerin ;) -- das zu erklären.
  
  1. Das Modul Exporter stell diverse Funktionen zu Verfügung, mit denen das Modul exportfähiges bekannt macht.
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  our ( $VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS ); use Exporter (); @ISA = qw(Exporter); @EXPORT = qw(); %EXPORT_TAGS = qw(); # eg: TAG => [ qw!name1 name2! ], # optionally exported functions @EXPORT_OK = qw();
  
  Funktionsnamen und andere Variablen werden als exportierfähig bekannt gemacht, in dem diese Namen in die *EXPORT... Variablen geschrieben werden.
  
  In @EXPORT stehen die Funktionen, Variablen etc. die automatisch in andere Programme importiert werden.
  
  Code (perl): (dl )
  
  @EXPORT = qw($blubb &blah %boing);
  
  Das bedeutet, dass bei
  
  Code (perl): (dl )
  
  use My::Module;
  
  automatisch die Vars $blubb &blah %boing ins Programm importiert werden.
  
  In @EXPORT_OK stehen die Methoden/Funktionen, die durch den Aufruf
  
  Code (perl): (dl )
  
  use My::Module qw(&func1 &func2 %hasch @arry);
  
  im Programm verwendet werden sollen. Damit werden &func1 &func2 %hasch @arry importiert.
  
  In %EXPORT_TAGS kannst du quasi Gruppen definieren, die dann in andere Programme importiert werden. Dann kannst du nämlich mit
  
  Code (perl): (dl )
  
  use My::Module qw(-alles);
  
  einen ganzen Pulk an zu importierenden Elementen nennen anstatt einer ganzen langen Liste.
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  %EXPORT_TAGS = ( -alles => [ qw(&dieses $jenes %dies @das %foo $bar &baz &boo) ], -min => [ qw(&minimalfunc $min) ], BOOH => [ qw(&boo &die $errornum @errors ] );
  
  In Siehe http://perldoc.perl.org/Exporter.html#Good-Practic... kannst du nachlesen wie sinnvoll vorgegangen wird beim befüllen der *EXPORT... Variablen in Modulen.
  
  2. Definition von Prerequieries
  Wie du die im Modul definierst? Mit use.
  Oder was meist du?
  
  3. Generelle Syntax und Aufbau des Codes
  Tja, das machen Leute verschieden.
  
  Die Funktion zur Erzeugung eines Objects sollte immer new heißen.
  Die variable, die das Objekt beinhaltet wird oft $self genannt.
  Um möglicherweise selbst im Modul aufzuräumen, sollte eine Methode DESTROY existieren.
  Jede Methode/Funktion sollte vorangestellt einen POD-Abschnitt als Dokumentation des Aufrufs etc. haben.
  
  Siehe auch Perl Best Practices http://alvar.a-blast.org/vortraege/perl-workshop/p...
  
  //EDIT: Kleines druchzuprobierendes beispiel findes sich auf https://sites.google.com/site/arjunwebworld/Home/p...
  Das ist nur wirklich ein grober Ausriss an (ungelenk erklärter) Informationen von mir.
  Last edited: 2012-12-20 14:34:07 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- GwenDragon
  
  2012-12-20 14:40
  
  User since
  2005-01-17
  14746 Artikel
  Admin1
  
  Erklär bitte mal genauer, was dir an Wissen beim Erstellen von Modulen fehlt?
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +8 replies
- rosti
  
  2012-12-20 14:44
  
  User since
  2011-03-19
  3470 Artikel
  BenutzerIn
  
  Gwen schrieb ja schon Einiges, danke Gwen.
  
  Hier nochn (Geschenk)Tipp von mir: ISBN 3826605705
  
  Perl Module. Effektiver programmieren mit dem CPAN- Archiv von Eric Foster-Johnson (1999)
  
  Und: Module entwickeln, das steht da auch drin ;)
  
  Ich bin kein CPAN-Entwickler, aber ich würde schauen, ob und inwiefern eine eigene Entwicklung in eine etwa bereits vorhandene Klassenhierarchie passt.
  - +7 replies
  - bianca
    
    2012-12-20 15:15
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    2012-12-20T13:44:55 rosti
    Ich bin kein CPAN-Entwickler, aber ich würde schauen, ob und inwiefern eine eigene Entwicklung in eine etwa bereits vorhandene Klassenhierarchie passt.
    
    Danke für die Tipps.
    Es ist das alte Thema FinTS/HBCI über Perl. Ich hoffe, dem Thema in Kürze näher zu kommen. Wie würdet ihr das nennen/einordnen?
    10 print "Hallo"
    20 goto 10
    - +3 replies
    - GwenDragon
      
      2012-12-20 15:29
      
      User since
      2005-01-17
      14746 Artikel
      Admin1
      
      Solange nicht klar ist was das Modul machen soll, passt es so ungefähr dort rein:
      Finance::*
      Business::*
      Algorithm::CheckDigits::*
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +2 replies
      - bianca
        
        2012-12-20 16:08
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        2012-12-20T14:29:45 GwenDragon
        Solange nicht klar ist was das Modul machen soll
        
        Es kommuniziert zwischen Script und Bank und wickelt alle Geschäftsvorfälle ab.
        10 print "Hallo"
        20 goto 10
        
        GwenDragon
        
        2012-12-20 16:17
        
        User since
        2005-01-17
        14746 Artikel
        Admin1
        
        Wie wäre so sowas wie:
        Finance::Bank::HBCI
        Finance::Bank::FinTS
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
    - +3 replies
    - Gast Gast
      
      2012-12-20 15:30
      
      2012-12-20T14:15:16 bianca
      Danke für die Tipps.
      Es ist das alte Thema FinTS/HBCI über Perl. Ich hoffe, dem Thema in Kürze näher zu kommen. Wie würdet ihr das nennen/einordnen?
      
      Solltest Du nicht besser zunächst einmal Deine Lösung des Problems programmieren und DANN nach dem Procedere einer CPAN Einschleusung fragen?
      Last edited: 2012-12-20 15:36:35 +0100 (CET)
      - GwenDragon
        
        2012-12-20 15:38
        
        User since
        2005-01-17
        14746 Artikel
        Admin1
        
        Da gebe ich dir Recht. Erst Problem lösen, dann Modul nach eigenem Gusto oder besserem Einfügen in CPAN benennen.
        
        Es ist doch kein Problem, notfalls den Modulnamen in vielen Dateien umzubenennen, das packt jeder Editor heute -- notfalls kann es auch ein Perleinzeiler von Tim Towdy ;)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - bianca
        
        2012-12-20 16:06
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        Guest Gast
        Solltest Du nicht besser zunächst einmal Deine Lösung des Problems programmieren und DANN nach dem Procedere einer CPAN Einschleusung fragen?
        
        Ja, klaro. Mir ist wichtig, von Anfang an beim Code darauf zu achten, dass später nicht zuviel geändert werden muss.
        Ich hätte halt jetzt - wie sonst auch - das ganze als sub{} in einer separaten pl Datei gebaut die man require't und alle Hin- und Rückgaben über eine Hashreferenz erledigt. Das ist ja für Module nicht die übliche Syntax, soweit ich das sehe.
        Aber wenn das kein Problem ist konzentriere ich mich erstmal auf die Problemlösung.
        10 print "Hallo"
        20 goto 10

View all threads created 2012-12-20 12:51.