$csv->print( $fh_out, [ @{$hr}{@felder} ] );