my @hdr = $csv->header ($fh, {
    munge_column_names => sub { state $i; $_ || "nothing.".$i++ }});