use Data::Dumper;

my @ar = "fred bert";

print Dumper(\@ar);