Du bist informatiker wenn...

[Cheatah]

#!/usr/bin/perl -w
use strict;

open DATA, "62962.html";

open DATA, "62962.html" or die "Kann 62962 nicht oeffnen: $!";

@posting = <DATA>

my @posting = <DATA>;

close (DATA);

foreach $zeile (@posting)

foreach my $zeile (@posting)
[...]

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

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

push (@posting, "Du das ganze anschließend korrigierst.");

use CGI ':standard';
print header, start_html, "Cheatah", end_html;