#!/hdd/opt/perl/bin/perl -d
use strict;
print "Content-type: text/html\n\n";
print '', "\n";
print "Test-Ausgabe\n";
print "Hurra, es klappt!
\n";
print "\n";
$Zahl = 42;
$Quadrat = $Zahl * $Zahl;
print "Das Quadrat von ", $Zahl, " = ", $Quadrat, "\n";