" " setzen, bzw. weglassen

[Flo]

Hallo!
Ich möchte in Perl Spalten aus einer Datenbank einlesen. Wenn ein Wert in einem Datenfeld steht, soll er in Anführungszeichen stehen, wenn das Feld leer ist, soll es leer bleiben (ohne die " ").
Wenn es jemanden interessiert, soweit wie unten bin ich im Moment...

Vielen Dank für die Antworten
Florian

___________________________________________________________________

while($db->FetchRow()) # Tabelle zeilenweise einlesen
{

( $PRUEFGR, $BENGR, $PDID, $TFID, $TBID, $FORMELID, $PARM1, $PARM2, $PARM3 ) = $db->Data();    # Daten aus den Datenfeldern lesen
  if length ($PRUEFGR) >0 $PRUEFGR=join("",",$PRUEFGR,");
 $newline = join (",",$PRUEFGR, $BENGR, $PDID, $TFID, $TBID, $FORMELID, $PARM1, $PARM2, $PARM3,"\n");

print OUTFILE $newline;