What?

use Data::Dump qw/ dd /;
use constant { a => 1, b => 2, c => [qw/ d e f /] };
dd a;
dd b;
dd c;
__END__
1
2
["d", "e", "f"]
[download]