my $fmt = join '', qw[ x[10] a5 x[22] a10 x[4] a3 a2 ... ];