#!/usr/bin/perl -w

use DBI;

#$dbh = DBI->connect(dbi:mysql:database="DB111111";host="rdbms.strato.de";port="3306", "U111111", "passwort");

print "Content-type: text/html\n\n";