Formular CGI Übergabe in Perl

[Wolfgang]

use strict;
use CGI;
use DBI;

use CGI::Carp qw(fatalsToBrowser);

my $nr = (anderwertig zugewiesen);

my $gen_cgi = new CGI;

my $name = $gen_cgi->param('name');
my $ip = $gen_cgi->param('ip');
my $host = $gen_cgi->param('host');
my $datum = $gen_cgi->param('datum');
my $wohnort = $gen_cgi->param('wohnort');
my $email = $gen_cgi->param('email');
my $url = $gen_cgi->param('url');
my $portfolio = $gen_cgi->param('portfolio');
my $country = $gen_cgi->param('country');
my $text = $gen_cgi->param('text');
my $kommentar = $gen_cgi->param('kommentar');

my $query="insert into gbook(nr,ip,host,datum,name,wohnort,email,url,portfolio,country,text,kommentar) values ($nr,'$ip','$host','$datum','$name','$wohnort','$email','$url','$portfolio','$country','$text','$kommentar')";

my $gen_dbh = DBI->connect('DBI:Oracle:','xxxxxx','xxxxx');
my $gen_sth = $gen_dbh->prepare($query);
.
.
.
.

Wieso wird der Variable($name) die ganze Wurscht vom Formular (alle Daten) zugewiesen???

----- Variable $query zeigt ------

insert into gbook(nr,ip,host,datum,name,wohnort,email,url,portfolio,country,text,kommentar) values (7,'','','',

'Wolfgang datum=Dienstag, den 16.Juli 2002, um 13:24:26 email=[e-mail] url=http://www.model.at.tf wohnort=Wien country=oesterreich_fl_d1.gif portfolio=professionell ip=137.208.3.47 host=tango.wu-wien.ac.at text=Test kommentar= '

,'','','','','','','')

P.S.: Fortsetzung von Problem in Thread
http://forum.de.selfhtml.org/?m=96080&t=17140