Depends what you want to do. And ill just chime in with yet another dumper to use... :-)

D:\>perl -MData::Dumper -e "@arr = qw (a b c); print Data::Dumper->new
+([\@arr])->Indent(0)->Dump"
$VAR1 = ['a','b','c'];

D:\>perl -MData::Dump::Streamer -e "@arr = qw (a b c); Dump(\@arr)->In
+dent(0)->Out()"
$ARRAY1 = [ 'a', 'b', 'c' ];

D:\>perl -MData::Dump::Streamer -e "@arr = (qw (a b),(qw(c)) x 4); Dum
+p(\@arr)->Names('*arr')->Indent(0)->Out()"
@arr = ( 'a', 'b', ( 'c' ) x 4 );
[download]

And yet another.

D:\>perl -MData::Dump=dump -e "@arr = (qw (a b),(qw(c)) x 4); print du
+mp(\@arr)"
["a", "b", "c", "c", "c", "c"]
[download]