Hallo,
sauberer arbeiten:
use strict;
use CGI;
use DBI;
require "/usr/logins/usercgi/oracle_setup.pl";
my $cgi = new CGI;
my $dbh = DBI->connect('DBI:Oracle:','j9952795','j9952795');
my $qh = $dbh->prepare('INSERT INTO gbook (nr, ip, host, datum, name, wohnort, email, url, portfolio, country, text, kommentar) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)');
$dq->execute(
$cgi->param('ip'),
$cgi->param('host'),
$cgi->param('datum'),
$cgi->param('wohnort'),
$cgi->param('email'),
$cgi->param('url'),
$cgi->param('portfolio'),
$cgi->param('country'),
$cgi->param('text'),
$cgi->param('kommentar')
) or die dbq->errstr;
Gruesse,
CK