use strict;
use warnings;

my @array;

if (@array) {
    print "array not empty";
}
else {
    print "array empty";
}

__END__

array empty