Select Code to Download

#!/usr/bin/perl
# vi:ts=4 sw=4 et:
...
# look what happened! AoA1 is changed!
print Dumper \@AoA1;