my $fmt = q[
    x[10] a5     # code
    x[22] a10    # thingummy
    x[4]  a3 a2  # doodah & whatsit
];
$fmt =~ s/#.*//g;