my @a = ('a', 'b', 'c');

##</code><code>##

my @a = 'a', 'b', 'c';

##</code><code>##

( my @a = 'a' ), 'b', 'c';

##</code><code>##

my @a = ( 1..4 );

##</code><code>##

my @a = 1..4;

##</code><code>##

use constant {
  zed     => 0,
  one     => 1,
  repos   => (qw(oss non-oss debug)),
  two     => 2,
};

##</code><code>##

use constant {
  zed       => 0,
  one       => 1,
  repos     => 'oss',
  'non-oss' => 'debug',
  two       => 2,
};