probleme mit mySQL

[Struppi]

#!/usr/bin/perl -w

use DBI;
use DBD::mysql;

Das ist nicht notwendig, dafür solltest du aber use strict verwenden, das schützt dich vor schwer zu findenen Fehlern.

$dbname="stecker";
$username="root";
$pw="passwort";

$data1 = "DBI:mysql:stecker";
$data2 = DBI->connect("$data1", "$username", "$pw", { RaiseError => 1 }) || die("Kann DB nicht öffnen!");

warum packst du die Variabeln in Anführungszeichen?
und hier liegt der Grund, warum du im Browser nichts angezeigt bekommst, wenn das CGI Programm hier stirbt, dann fehlt dem Browser der Header und er zeigt dir die Meldung internal Error, es empfiehlt sich daher in der Entwicklung use CGI::Carp qw(fatalsToBrowser); einzubinden.

while (@ergf = $abfr1->fetchrow_array)
{
$count++;

foreach $index (@ergf)

{

#  ($VerweisID,$Kunde,$BR,$STGname,$Version,$Steckername)=split(/:/,$index);
#  @VerweisID[$count]=$VerweisID;

In dem Fall würde ich fetchrow_hashref empfehlen, dann sparst du dir hier das split.

Struppi.