Utiliser la fonction scalar sur le tableau pour avoir le nombre d'éléments et la variable $#tabular pour avoir l'indice de son dernier élément :
#!/usr/local/bin/perl use strict; my @tab = qw( dernier second premier ); print "Il y a ".(scalar(@tab)). " elements dans le tableau\n"; print "Son dernier indice est ".$#tab."\n";