Select Code to Download

#!/usr/local/bin/perl -w
use strict;
...
BB for ball
B for ball
C for ....

:A:
AA for apple
...
B for ball
:C:
C for ....

#!/usr/local/bin/perl -w
use strict;
...
AA for apple
A for apple
...

#!/usr/local/bin/perl -w
use strict;
...
AA for apple
A for apple
...