$ perl -wE 'for (0 .. 1) { my @x = $_ == 0 ? qw{a b} : qw{c d e}; say \@x; say @x; }'
ARRAY(0x100a1d40)
ab
ARRAY(0x100a1d40)
cde