my $fld1  = q{};
my $fld6  = q{};
...
my $fld15 = q{};