...
while ( my $row = $csv->getline( $fh ) ) {

   # einzelne Felder ausgeben
   print $row->[0], "\n";
   print $row->[1], "\n";

   # alle Felder ausgeben
   print join( " ", @$row ), "\n";
}
...