$ perl -Mstrict -E 'my $aref = [ "", undef ]; say scalar @{ $aref || [] } ? "True" : "False";' True