#!/Perl/bin/perl -w
use strict;
use warnings;
# einfaches Taschenrechnerprogramm
my $zahl1
my $zahl2
my $rechenart
my $ergebnis
read(STDIN, $input, $ENV{ 'CONTENT_LENGTH'});
print "Content-type: text/html\n\n";
print "";
print "";
print "Antwortseite des CGI-Programms";
print "n\";
print "";
print "";
print "
$ergebnis\n";