my $kundenrs = $db->resultset('Kunde')->search(undef,
  {columns => ['name','vorname']});

   while (my $test = $kundenrs->next) {
     print $test->name .', '. $test->vorname. " ";
   }