in reply to Empty or not empty ?

Too much wine indeed! Just use the array in scalar context: 
if (! @array) {
  print "nothing there\n";
}

[download]

In Section Seekers of Perl Wisdom