Problem After Fork (gelöst) (Allgemeines zu Perl)

[thread]20610[/thread]

Problem After Fork [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 12

Articles: hide open all | hide show old branches

+5 replies
mark05

2019-04-26 13:46

User since
2010-01-05
129 Artikel
BenutzerIn

hi

ich wusste nicht wie ich es anders be Titeln sollte ;) .

Um was geht es :
ich habe mit ein Prgramm geschrieben um viele Netwerkdevices mit
CLI Befehlen zu betanken , z.b .config sichern auf 50 Switchen.

Damit das ganze nicht Sequenziell abäuft , nutze ich pro device einen fork
, mit limit auf X forks.

Die Fork schreiben per pipe in ein Zentrales log , welches ausgewerten
wird nachdem alle devices abgearbeitet sind.

das ganze Funktioniert auch alles wie gewünscht , bis zu dem Punkt,
in dem mehr als 35 devices in det Job Datei enthalten sind.

Er Arbeitet zwar alle Devices ab und loggt das auch , aber er führt
nicht mehr die Auswertung aus.

Fehlermeldung bekomme ich keine.

Code hänge ich mal an.

in forkdeploy.pl , geht es um
sub doit und dann rund um die zeilen 318 , dem call zum Reporting hin,
weches bis ca 30-35 devices funktioniert.

eine Test.job liegt auch bei.

Ich hoffe ihr habt eine Idee , da ich gerade etwas auf dem Schlauch stehe.

Holger
Anhänge

application/zip
deploy.zip

Last edited: 2019-04-26 13:48:43 +0200 (CEST)
- +4 replies
- rosti
  
  2019-04-26 15:46
  
  User since
  2011-03-19
  3470 Artikel
  BenutzerIn
  
  50 Switches ist ja nun kein Thema. Wir hatten zwanzigtausend ;)
  
  Stichwort Loggen/Report: Guck mal daß es hier keine Laufzeitprobleme bzw. Raceconditions gibt, also einen LOCK_EX gesetzt hast. Dann ist es auch so, daß die Ausgabe in eine Logdatei gepuffert ist, so daß da u.U. nicht alles ankommt, prüf das mal. Viel Erfolg.
  - +3 replies
  - mark05
    
    2019-05-02 09:19
    
    User since
    2010-01-05
    129 Artikel
    BenutzerIn
    
    hi
    
    problem gefunden , witzigerweise ist es kein problem des fork´en.
    
    das Problem ist , war , das Mail::Sendeasy Modul.
    ich bis auf MIME::Lite umgestigen und nun Funktioniert alles wie gewollt,
    unabhängig von der Anzahl der Devices.
    
    Holger
    - +2 replies
    - GwenDragon
      
      2019-05-02 10:57
      
      User since
      2005-01-17
      14746 Artikel
      Admin1
      
      Ich habe dein Programm nicht analysiert, trotzdem wäre es schon für andere interessant zu wissen: was genau bei dem Modul Mail::Sendeasy das Problem verursacht hat.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - mark05
        
        2019-05-03 10:24
        
        User since
        2010-01-05
        129 Artikel
        BenutzerIn
        
        hi
        
        eigentlich habe ich nix gross spezielles gemacht.
        
        ich gehe mein logfile durch und lasse via Data::Report
        einen HTML Tabelle/report erstellen.
        
        das Ergebniss ist eine variable $msg.
        
        Nun gehe ich nach Mail::SendEasy Dokumentation vor
        https://metacpan.org/pod/Mail::SendEasy
        
        Code: (dl )
        
        1 2 3 4 5 6 7
        
        my $status = $mail->send( from => $self->{'smtpfrom'} , reply => $self->{'smtpto'} , to => $self->{'smtpto'} , subject => 'Job Report ' . $self->{'jobname'}, html => $msg, ) ;
        
        das scheint dann bis zu einer bestimmten grösse der Variable zu Funktionieren .
        
        letzten endlich habe ich nur den Mail::SendEasy teil ausgetauscht
        zu MIME::Lite
        
        Code: (dl )
        
        1 2 3 4 5 6 7 8 9 10
        
        my $email = MIME::Lite->new( From => $self->{'smtpfrom'}, To => $self->{'smtpto'}, Reply => $self->{'smtpto'}, Subject => 'Job Report ' . $self->{'jobname'}, Data => $msg, ); $email->attr('content-type' => 'text/html'); $email->send('smtp',$self->{'smtpserver'}, Debug => $self->{'debug'}, );
        
        und in den Tiefen von Mail::SendEasy rum zu debuggen hatte ich keine Zeit.
        
        Holger

View all threads created 2019-04-26 13:46.