my $sth = $dbh->prepare( "SELECT name,size,id,pid,mtime FROM $tabelle" );
$sth->execute();
while(my @elm=$sth->fetchrow_array())
{
  my $line=join(',',map{'"'.$_.'"'}@elm);
  print $line."\n";
}