Email schreiben (solved) (Fragen zu Perl-Modulen)

[thread]19052[/thread]

Email schreiben [solved]

Tags: perl5 email MIME::Lite Similar Threads

Readers: 16

Articles: hide open all | hide show old branches

+9 replies
DarAvanger05

2014-04-25 14:00
User since
2014-03-03
44 articles
BenutzerIn
Hallo zusammen,
ich habe auf einem Server eine Art Dropbox Lösung also das die User sich Speicherplatz mieten können und diese sollen dann autmatisch per Skript per Email informiert werden falls Sie nur noch wenig Speicherplatz zur Verfügung haben.

Daher habe ich versuchr auf einer Linux Maschine und VmWare das folgende Skript zu schreiben.
Allerdings gehen die Emails nicht raus.
Haber ich irgendwas nicht beachtet?
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

use warnings; use strict; use MIME::Lite; my $msg; $msg = MIME::Lite->new( From => 'testmail@testmailsystem', To => 'benni05@t-online.de', #Cc => 'some@other.com, some@more.com', Subject => 'TESTMAIL', Type => 'TEXT', Data => "TEST" ); $msg->send; #default is to use "sendmail".
- +8 replies
- pq
  
  2014-04-25 14:32
  
  User since
  2003-08-04
  12209 articles
  Admin1
  
  kannst du direkt per sendmail-kommando was rausschicken?
  hast du schonmal Debug versucht?
  $msg->send(Debug => 1);
  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
  - +7 replies
  - DarAvanger05
    
    2014-04-25 14:37
    
    User since
    2014-03-03
    44 articles
    BenutzerIn
    
    wenn ich das mache wie kommt das hier raus :
    
    Unknown send method 'Debug'
    
    und das hier ändert sich :
    
    $msg->send(Debug => 1); #default is to use "sendmail".
    - +6 replies
    - pq
      
      2014-04-25 15:10
      
      User since
      2003-08-04
      12209 articles
      Admin1
      
      was ist mit meiner ersten frage? kannst du direkt per sendmail was schicken?
      schau bitte auch in die doku.
      
      versuche folgendes:
      $msg->send("sendmail", "/usr/lib/sendmail -t -oi -oem", Debug => 1);
      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
      - +5 replies
      - DarAvanger05
        
        2014-04-25 15:22
        
        User since
        2014-03-03
        44 articles
        BenutzerIn
        
        Also wie teste ich das mit sendmail?
        Habe das hier jetzt so:
        
        Code: (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
        
        use warnings; use strict; use MIME::Lite; my $msg; $msg = MIME::Lite->new( From => 'testmail@testmailsystem', To => 'benni05@t-online.de', #Cc => 'some@other.com, some@more.com', Subject => 'TESTMAIL', Type => 'TEXT', Data => "TEST" ); $msg->send("sendmail", "/usr/lib/sendmail -t -oi -oem", Debug => 1);
        
        Er meckert nicht aber es kommt auch nichts an :/
        
        pq
        
        2014-04-25 16:22
        
        User since
        2003-08-04
        12209 articles
        Admin1
        
        ich meinte direkt auf der kommandozeile.
        
        Code: (dl )
        
        1 2 3 4 5 6 7
        
        $ /usr/lib/sendmail -t -oi -oem To: email1 From: email2 Subject: testmail test CTRL-D
        
        steht was im log? z.b. /var/log/exim4/mainlog, falls exim verwendet wird.
        ggfs. den admin fragen, wo die mail hängenbleibt. ist dann nicht mehr unbedingt ein perl-problem.
        Last edited: 2014-04-25 16:45:35 +0200 (CEST)
        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
        
        frankes
        
        2014-04-26 07:40
        
        User since
        2005-04-02
        140 articles
        BenutzerIn
        
        Wobei der Pfad zu sendmail sehr unterschiedlich sein kann. Neben "usr/lib/sendmail" liegt es bei Debian und vielen anderen meist in "/usr/sbin/sendmail". Aber auch "/usr/bin/sendmail" und ganz eigene Pfade habe ich schon gesehen.
        
        MIME::Lite testet allerdings nur auf /usr/lib/sendmail und /usr/sbin/sendmail, um sonst schlicht den Pfad auf sendmail zu setzten.
        
        Man kann sich also nicht darauf verlassen, dass MIME::Lite sendmail schon irgendwie finden wird.
        
        +2 replies
        
        GwenDragon
        
        2014-04-26 09:30
        
        User since
        2005-01-17
        14939 articles
        Admin1
        
        Quote
        
        Code: (dl )
        
        From => 'testmail@testmailsystem',
        
        Da kann ich dir gleich sagen, dass der Server das nicht annimmt.
        testmailsystem ist kein gültiger qualifizierter Domainname.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        DarAvanger05
        
        2014-04-28 18:06
        
        User since
        2014-03-03
        44 articles
        BenutzerIn
        
        Alles klar nach einem Gespräch mit dem Admin und einer Änderung der Domäne des Absenders hat es dann auch funktioniert!
        Danke für die Hilfe!

View all threads created 2014-04-25 14:00.