Du bist informatiker wenn...

[speedy]

open DATA, "62962.html";
@posting = <DATA>
close (DATA);

foreach $zeile (@posting)
{
  $zeile =~ s/@t/@/go;
  $zeile =~ s/0/o/go;
  $zeile =~ s/4/a/go;
  $zeile =~ s/353/ese/go;
  $zeile =~ s/57/st/go;
}

push ( @posting, "Du Antworten auf Forumspostings in PERL verfasst");

push ( @posting, "Du diesen Mist auch noch lesen kannst");