diff --git a/lib/NGCP/BulkProcessor/Projects/ETL/Customer/Dao/Tabular.pm b/lib/NGCP/BulkProcessor/Projects/ETL/Customer/Dao/Tabular.pm index cd7d692..37c6044 100644 --- a/lib/NGCP/BulkProcessor/Projects/ETL/Customer/Dao/Tabular.pm +++ b/lib/NGCP/BulkProcessor/Projects/ETL/Customer/Dao/Tabular.pm @@ -54,7 +54,7 @@ sub get_fieldnames { my $expected = shift; unless (defined $fieldnames and defined $expected_fieldnames) { $fieldnames = [ map { - local $_ = (ref $_ ? $_->{path} : $_); + local $_ = (ref $_ ? (exists $_->{colname} ? $_->{colname} : $_->{path}) : $_); $_ =~ s/\./_/g; $_ =~ s/\[(\d+)\]/_$1/g; $_;