Hi, ich suche noch nach einer eleganten moeglichkeit direkt via command line options im mutt in den mail edit mode zu springen. D.h. ich habe eine mail (body) blos recipients und subject - Jetzt wuerde ich gerne mutt aufrufen der sofort in den edit mode der mail spring und damit meinen externen editor (vi) aufruft. D.h. ich kann dann noch schnell korrekturen ausfuehren und dann die mail schicken. Das ganze hat den zweck mein spam relay processing einfacher zu machen. Ich habe nen kleines script was bereits den mailheader eine mail durchpfluegt und mir die ip addressen extrahiert und diese via orbd nachschlaegt. Jetzt wuerde ich gerne in dem fall das keine ip addresse via ordb gelistet ist und nicht nur meine drin stehen sofort eine mail fuer submit@ordb.org schreiben und in den edit mode springen. #!/usr/bin/perl -sw my $date; my @addresses; # Extract all ip addresses from mail header while(<>) { chomp(); last if (/^$/); if (/^Date: (.*)/) { $date=$1; } if (/^Message-ID: (.*)/i) { $msgid=$1; } while(s/([\d]{1,3}\.[\d]{1,3}\.[\d]{1,3}\.[\d]{1,3})//) { push @addresses,$1; } } printf("MsgID: %s\n", $msgid); # look on mail addresses foreach my $addr ( @addresses ) { my (@q) = split(/\./, $addr); my $rev=sprintf("%d.%d.%d.%d.relays.ordb.org", $q[3], $q[2], $q[1], $q[0]); my $ordb=`host $rev 2>&1`; my $result=($ordb =~ /127.0.0/) ? "listed" : "unlisted"; printf("%-15s %-35s %-10s\n", $addr, $rev, $result); } Alternativ das ganze in eine datei - Selber vi aufrufen und via mails verschicken - nachteil - Wird wieder nicht im FCC folder archiviert - Signature fehlt etc ... Flo -- Florian Lohoff flo@rfc822.org +49-5201-669912 Heisenberg may have been here.
Teilnehmer (5)
-
Cord Beermann
-
Florian Lohoff
-
Ingo Luetkebohle
-
Maik Holtkamp
-
Volker Gueth