| Subject: | adDump writes out null cells as empty strings |
The incriminated block seems to be (in AnyData::adDump sub):
while (my $row = each %$table) {
my @row = map {$row->{$_} || ''} @cols;
for (@row) { print "[$_]"; }
print "\n";
}
Workaround is to replace first block line with:
my @row = map {defined $row->{$_} ? $row->{$_} : ''} @cols;