in reply to Is there a better way to check if an array is empty?

Try to add/remove some 'pop's' here: 
my @a = ( 1,3,5,7 );
pop @a;
pop @a;
print "\@a is (" . (join ", ", @a) . ")\n";
unless (@a) { print "empty\n" }

[download]

In Section Seekers of Perl Wisdom