Programierer gesucht

[Frank Schönmann]

hi!

DatumTitelBeschreibungKeywordsURLNameEmail
Danach ein Zeilenumbruch und dann der nächste Eintrag
So nun Such ein Script das aus diesem Logfile die Emailadresse herrausfiltert, und diese dann in das
Datenfile meines Newsletters schreibt. Wenn danach das Logfile auch gleich gelöscht wird, wäre das
nicht schlecht.

=== cut ===
#!/usr/bin/perl

$submit = "submit.dat";
$newsletter = "newsletter.dat";

open SUBMIT, "<$submit" or die "Cannot open submit.dat: $!";
open NEWS, ">>$newsletter" or die "Cannot open newsletter.dat: $!";
for (<SUBMIT>)
{
  my ($datum, $titel, $beschreibung, $keywords, $url, $name, $email) = split //, $_;
  print NEWS "$email\n";
}
close NEWS;
close SUBMIT;
unlink $submit;
=== cut ===

eMail-Adressen stehen in $newsletter (hier newsletter.dat), eine eMail-Adresse pro Zeile.
Zeitaufwand: 2 Minuten.

bye, Frank!