Help for this page

Select Code to Download

Select or download this
```
1, 4, 7, A, D, G, J, M, P, S, V, Y
```

Select or download this

my @AoA = map [split], <DATA>;

print join( ', ' , @{ $AoA[ 0 ] } ) , "\n";