use Data::Dumper;
my @a = (2, 5, 7);
print Dumper \@a;