Select Code to Download

my @Array;
$Array[0] = "1,5";
...

use Data::Dumper;
print Dumper \@Array;

my @Array = (
    [1, 5],
...

use Data::Dumper;
print Dumper \@Array;