Select Code to Download

]a[1
]b[FORTUNE BAY]1[R74]c[(9)]d[58
...
]m[ F(0-0-0) G(13-0-4) D(7-0-3) S(6-1-3) H(2-0-1) C(0-0-0) Dst(3-0-2)

]a[3

---------------------
The tags are the flagged using ] and [ 
eg ]a[

my $a = '\[a\]';
my $b = '\[b\]';
...
    
}
close HANDLE;

eg ]b[LUCKY LAD]1[R72]c[(10)]d[57