Select Code to Download

1    A
0    B
...
5    A
3    E
1    E

6    A
0    B
5    C
4    E

#!/usr/bin/perl
use strict;
...
close INFILE;
close OUTFILE;