Perl jak sprawdzić, czy tablica jest wciąż pusta?

Question

To powinno być proste, mam nadzieję. Inicjuję pustą tablicę, wykonuję grep i umieszczam w nim wyniki (jeśli istnieją), a następnie sprawdzam, czy są puste. Tak jak poniżej:

my @match =(); 
@match = grep /$pattern/, @someOtherArray; 
if (#match is empty#) { 
    #do something! 
} 

Jaki jest standardowy sposób robienia tego?

Answer 1

Zobaczysz wszystkie te idiomy używane do sprawdzenia, czy tablica jest pusta.

if (!@match) 
if (@match == 0) 
if (scalar @match == 0) 

W kontekście skalarnym tablica jest oceniana jako liczba zawartych w niej elementów.

Answer 2

Jeśli używasz arrayref zamiast tablicy, powiedz np.

$my existing_match = data_layer->find('Sale',{id => $id}); 

Say powyżej zwraca tablicę, a następnie użyć:

if(scalar(@$existing_match) == 0)