Hallo, Am Don, 03 Jun 2010, Erik P. Roderwald schrieb:
On Donnerstag 03 Juni 2010, Joerg Thuemmler wrote:
Vielleicht geht das im Perl besser
Du liest ja in Perl die Datei zeilenweise über eine foreach-Schleife aus. Man könnte z. B. in die foreach-Schleife am Ende eine if-Anweisung schreiben. Ungefähr so:
Unnötig. Um den ganzen Kram kümmert sich schon Net::POP3. Genau deswegen will man ja perl statt bash/netcat zu verwenden. BTW: netcat ist überflüssig, die bash kann das auch selber. exec 3<>/dev/tcp/MAILHOST/110 echo "USER" >&3 read <&3 ... Aber es ist mühsam, selber direkt POP3 zu reden, geschweige den POP3S oder gar IMAPS ... Mit Perl alles kein Problem. -dnh --
Leider Gottes ist es so, daß wenn man einen Spammer zu Strecke gebracht hat, dafür drei neue auftauchen. Das ist wie bei den Fliegen. Schlägst Du eine Tot, kommen 40 zur Beerdigung. ;) [> Martin Mewes und Michael Raab in suse-linux] -- Um die Liste abzubestellen, schicken Sie eine Mail an: opensuse-de+unsubscribe@opensuse.org Um eine Liste aller verfuegbaren Kommandos zu bekommen, schicken Sie eine Mail an: opensuse-de+help@opensuse.org