format_c@linux:~/perl_samples> perl
use strict;
use LWP::Simple;
my $lnr = '2689';
my $k1='52';
my $k2='48';
my $getURL=qq~http://www.schlachtplatz.de/cgi-bin/spiel/karte.pl?lnr=$lnr&k1=$k1&k2=$k2~;

# ---------------------------------------------------
# LOGIK
# ---------------------------------------------------

my $file = get( $getURL );
print "Content-type: text/html\n\n";
print $file;

Content-type: text/html

format_c@linux:~/perl_samples>