test

my @a=(1,2,3);

dfadfa

adfsfas

my @a;
if (@a) { print "check 1\n"; }
@a=(1,2);
if (@a) { print "check 2\n"; }

my @a;
if (@a) { print "check 1\n"; }
@a=(1,2);
if (@a) { print "check 2\n"; }