foreach (@AoA) {
    print @{$_} . "_____________________________________________________________
__\n";