my @array = (1, 2, 3);
print Dumper \@array;