reduce memory usage importing CSV files

This commit is contained in:
Thomas Bloor 2019-09-10 09:29:17 +01:00
parent 1efabeb45e
commit 9299c46fdf
No known key found for this signature in database
GPG key ID: 4657C7EBE42CC5CC
2 changed files with 6 additions and 3 deletions

View file

@ -15,9 +15,7 @@ has '+csv_required_columns' => (
sub import_csv {
my ($self) = @_;
my $rows = $self->csv_data;
foreach my $row ( @{$rows} ) {
while ( my $row = $self->get_csv_line ) {
$self->_row_to_result($row);
}
}