$csv->print (*STDOUT, $_) for @records;