Il me semble avoir rencontré plusieurs façons différentes de trouver la taille d'un tableau. Quelle est la différence entre ces trois méthodes?

my @arr = (2);
print scalar @arr; # First way to print array size

print $#arr; # Second way to print array size

my $arrSize = @arr;
print $arrSize; # Third way to print array size

Les première et troisième façons sont les mêmes: elles évaluent un tableau dans un contexte scalaire. Je considère que c'est la façon standard d'obtenir la taille d'un tableau.

La deuxième façon renvoie en fait le dernier index du tableau, qui n'est pas (généralement) le même que la taille du tableau.

Premièrement, le second n'est pas équivalent aux deux autres. $#arrayrenvoie le dernier index du tableau, qui est un de moins que la taille du tableau.

Les deux autres sont pratiquement les mêmes. Vous utilisez simplement deux moyens différents pour créer un contexte scalaire. Cela revient à une question de lisibilité.

Personnellement, je préfère ce qui suit:

say 0+@array;          # Represent @array as a number

Je trouve cela plus clair que

say scalar(@array);    # Represent @array as a scalar

et

my $size = @array;
say $size;

Ce dernier semble assez clair seul comme celui-ci, mais je trouve que la ligne supplémentaire enlève de la clarté lorsqu'elle fait partie d'un autre code. Il est utile pour enseigner ce qui @arrayfait dans un contexte scalaire, et peut-être si vous souhaitez utiliser $sizeplus d'une fois.

Cela obtient la taille en forçant le tableau dans un contexte scalaire, dans lequel il est évalué comme sa taille:

print scalar @arr;

C'est une autre façon de forcer le tableau dans un contexte scalaire, car il est affecté à une variable scalaire:

my $arrSize = @arr;

Cela obtient l'index du dernier élément du tableau, il s'agit donc en fait de la taille moins 1 (en supposant que les index commencent à 0, ce qui est réglable en Perl, bien que cela soit généralement une mauvaise idée):

print $#arr;

Ce dernier n'est pas vraiment bon à utiliser pour obtenir la taille du tableau. Il serait utile si vous souhaitez simplement obtenir le dernier élément du tableau:

my $lastElement = $arr[$#arr];

De plus, comme vous pouvez le voir ici sur Stack Overflow, cette construction n'est pas gérée correctement par la plupart des surligneurs de syntaxe ...

Pour utiliser la deuxième méthode, ajoutez 1:

print $#arr + 1; # Second way to print array size

Tous les trois donnent le même résultat si nous modifions un peu le second:

my @arr = (2, 4, 8, 10);

print "First result:\n";
print scalar @arr; 

print "\n\nSecond result:\n";
print $#arr + 1; # Shift numeration with +1 as it shows last index that starts with 0.

print "\n\nThird result:\n";
my $arrSize = @arr;
print $arrSize;

Exemple:

my @a = (undef, undef);
my $size = @a;

warn "Size: " . $#a;   # Size: 1. It's not the size
warn "Size: " . $size; # Size: 2

La section «Types de variables Perl» de la documentation perlintro contient

La variable spéciale $#arrayvous indique l'index du dernier élément d'un tableau:

print $mixed[$#mixed];       # last element, prints 1.23

Vous pourriez être tenté d'utiliser $#array + 1pour vous dire combien d'éléments il y a dans un tableau. Ne t'embête pas. En l'occurrence, l'utilisation de l' @arrayendroit où Perl s'attend à trouver une valeur scalaire («dans un contexte scalaire») vous donnera le nombre d'éléments dans le tableau:

if (@animals < 5) { ... }

La documentation des perldata couvre également cela dans la section «Valeurs scalaires» .

Si vous évaluez un tableau dans un contexte scalaire, il renvoie la longueur du tableau. (Notez que ce n'est pas le cas des listes, qui renvoient la dernière valeur, comme l'opérateur virgule C, ni des fonctions intégrées, qui renvoient tout ce qu'elles ont envie de retourner.) Ce qui suit est toujours vrai:

scalar(@whatever) == $#whatever + 1;

Certains programmeurs choisissent d'utiliser une conversion explicite afin de ne laisser aucun doute:

$element_count = scalar(@whatever);

Plus haut dans la même section explique comment obtenir l'index du dernier élément d'un tableau.

La longueur d'un tableau est une valeur scalaire. Vous pouvez trouver la longueur du tableau @daysen évaluant $#days, comme dans csh. Cependant, ce n'est pas la longueur du tableau; c'est l'indice du dernier élément, qui est une valeur différente car il y a normalement un 0ème élément.

Il existe différentes façons d'imprimer la taille du tableau. Voici la signification de tous: Disons que notre tableau estmy @arr = (3,4);

Méthode 1: scalaire

C'est la bonne façon d'obtenir la taille des tableaux.

print scalar @arr;  # prints size, here 2

Méthode 2: numéro d'index

$#arrdonne le dernier index d'un tableau. donc si le tableau est de taille 10 alors son dernier index serait 9.

print $#arr;     # prints 1, as last index is 1
print $#arr + 1; # Add 1 to last index to get array size

Nous ajoutons 1 ici en considérant le tableau comme indexé 0 . Mais, s'il n'est pas basé sur zéro, cette logique échouera .

perl -le 'local $[ = 4; my @arr=(3,4); print $#arr + 1;'   # prints 6

L'exemple ci-dessus imprime 6, car nous avons défini son index initial à 4. L'index serait maintenant 5 et 6, avec les éléments 3 et 4 respectivement.

Méthode 3:

Lorsqu'un tableau est utilisé dans un contexte scalaire, il renvoie la taille du tableau

my $size = @arr;
print $size;   # prints size, here 2

En fait, la méthode 3 et la méthode 1 sont identiques.

De perldoc perldata , qui devrait être sûr de citer:

Ce qui suit est toujours vrai:

scalar(@whatever) == $#whatever + 1;

Tant que vous ne faites pas $ # n'importe quoi ++ et augmentez mystérieusement la taille ou votre tableau.

Les indices de tableau commencent par 0.

et

Vous pouvez tronquer un tableau à rien en lui affectant la liste nulle (). Les éléments suivants sont équivalents:

    @whatever = ();
    $#whatever = -1;

Ce qui m'amène à ce que je cherchais, à savoir comment détecter que le tableau est vide. Je l'ai trouvé si $ # empty == -1;

Qu'en est-il de int(@array) est-il car il menace l'argument comme scalaire.

Pour trouver la taille d'une utilisation du tableau le scalarmot - clé:

print scalar @array;

Pour connaître le dernier index d'un tableau, il existe $#(variable Perl par défaut). Il donne le dernier index d'un tableau. Lorsqu'un tableau commence à 0, nous obtenons la taille du tableau en en ajoutant un à $#:

print "$#array+1";

Exemple:

my @a = qw(1 3 5);
print scalar @a, "\n";
print $#a+1, "\n";

Production:

3

3