106 |
|
|
107 |
my $cols = 0; |
my $cols = 0; |
108 |
|
|
109 |
my $hash = $self->ds_to_hash( $ds, $self->filter, disable_key_mungle => 1 ); |
my $hash = $self->ds_to_hash( $ds, $self->filter, disable_key_mungle => 1, single_values => 1 ); |
110 |
$log->debug("hash from ",$self->filter," = ", sub { dump( $hash ) }); |
$log->debug("hash from ",$self->filter," = ", sub { dump( $hash ) }); |
111 |
|
|
112 |
my $worksheet = $self->worksheet || $log->logconfess("no worksheet?"); |
my $worksheet = $self->worksheet || $log->logconfess("no worksheet?"); |
134 |
|
|
135 |
my $log = $self->_get_logger(); |
my $log = $self->_get_logger(); |
136 |
|
|
137 |
|
my $path = $self->path; |
138 |
|
|
139 |
$self->workbook->close() || |
$self->workbook->close() || |
140 |
$log->logdie("can't close Excel file ", $self->path, ": $!"); |
$log->logdie("can't close Excel file $path: $!"); |
141 |
|
|
142 |
|
$log->info("created $path ", -s $path, " bytes with ", $self->line, " rows"); |
143 |
|
|
144 |
|
return $self->line; |
145 |
} |
} |
146 |
|
|
147 |
=head1 AUTHOR |
=head1 AUTHOR |