Frickelmeister: Kann DB nicht auslesen (PERL)?

Beitrag lesen

Hola,
ich habe jetzt mal grob die mySQL Doku überflogen, damit ich überhaupt mal ein wenig Ahnung davon habe, wie ich überhaupt eine DB anlege. Ich habe mit PHPmyAdmin von meinem Webspace aus 2 Spalten (vorname und nachname) angelegt und mit einem Wert gefüttert. Jetzt wollte ich mit einem Perl Script diese Werte im Browser ausgeben lassen, aber bekomme folgende Meldung?
Can't connect(DBI::mysql::db12640001:xxxx.c.artfiles.de xxxxxxxxx 40148668 HASH(0x80f560c)), no database driver specified and DBI_DSN env var not set at /home/www/doc/xxxx/xxxxxxxx/datenbanktest.cgi line 12
Was soll das sein?
Hier mal das Script:

#!/usr/bin/perl -w

use DBI;
use CGI::Carp qw(fatalsToBrowser);
use strict;

my $database = 'xxxxxx';
my $dbserver = 'xxxxxc.artfiles.de';
my $user = 'xxxxxx';
my $pass = 'xxxxxx';

my $dbh = DBI->connect("DBI::mysql::$database:$dbserver", $user, $pass, { RaiseError => 1, AutoCommit => 0 }) or die "Cant connect : $!\n";
my $sth = $dbh->prepare("SELECT * FROM haupttabelle") or die "Cant prepare : $!\n";
$sth->execute or die "cant execute : $!\n";

print "Content-type:text/html\n\n";
while (my @row = $sth->fetchrow_array)   {
print "@row\n";
}

$dbh = DBI->disconnect;
Wozu dient überhaupt dieses execute?
Hier http://search.cpan.org/dist/DBI/DBI.pm#Outline_Usage findet man nur folgende Zeilen:

$sth = $dbh->prepare("SELECT foo, bar FROM table WHERE baz=?");

$sth->execute( $baz );

while ( @row = $sth->fetchrow_array ) {
    print "@row\n";
  }
Worauf bezieht sich $baz ?
Ich bin genauso schlau wie vorher.
Ich hoffe jemand kann mir diese Noob Fragen beantworten, danke.

Frickelmeister.