Wydaje mi się, że natknąłem się na kilka różnych sposobów, aby znaleźć rozmiar tablicy. Jaka jest różnica między tymi trzema metodami?

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

Pierwszy i trzeci sposób są takie same: oceniają tablicę w kontekście skalarnym. Uznałbym to za standardowy sposób na uzyskanie rozmiaru tablicy.

Drugi sposób faktycznie zwraca ostatni indeks tablicy, który nie jest (zwykle) taki sam jak rozmiar tablicy.

Po pierwsze, drugi nie jest równoważny dwóm pozostałym. $#arrayzwraca ostatni indeks tablicy, który jest o jeden mniejszy niż rozmiar tablicy.

Pozostałe dwa są praktycznie takie same. Po prostu używasz dwóch różnych środków do stworzenia kontekstu skalarnego. Wszystko sprowadza się do kwestii czytelności.

Osobiście wolę następujące:

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

Uważam, że to jaśniejsze niż

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

i

my $size = @array;
say $size;

Ten ostatni wygląda całkiem wyraźnie sam, ale uważam, że dodatkowa linia odbiera jasność, gdy jest częścią innego kodu. Jest to przydatne do nauczania tego, co @arrayrobi w kontekście skalarnym, a może jeśli chcesz użyć $sizewięcej niż raz.

Rozmiar uzyskuje się, zmuszając tablicę do kontekstu skalarnego, w którym jest ona oceniana jako jej rozmiar:

print scalar @arr;

Jest to kolejny sposób na zmuszenie tablicy do kontekstu skalarnego, ponieważ jest ona przypisana do zmiennej skalarnej:

my $arrSize = @arr;

Pobiera indeks ostatniego elementu w tablicy, więc w rzeczywistości jest to rozmiar minus 1 (zakładając, że indeksy zaczynają się od 0, które można regulować w Perlu, chociaż jest to zwykle zły pomysł):

print $#arr;

Ten ostatni nie jest zbyt dobry do uzyskania rozmiaru tablicy. Przydałoby się, jeśli chcesz tylko uzyskać ostatni element tablicy:

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

Ponadto, jak widać tutaj na przepełnieniu stosu, ta konstrukcja nie jest obsługiwana poprawnie przez większość wyróżników składni ...

Aby użyć drugiego sposobu, dodaj 1:

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

Wszystkie trzy dają ten sam wynik, jeśli nieco zmodyfikujemy drugi:

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;

Przykład:

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

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

Sekcja „Perl typy zmiennych” z dokumentacji perlintro zawiera

Zmienna specjalna $#arrayinformuje o indeksie ostatniego elementu tablicy:

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

Możesz ulec pokusie, aby $#array + 1powiedzieć ci, ile przedmiotów jest w tablicy. Nie zawracaj sobie głowy Tak się składa, że ​​użycie miejsca, w @arrayktórym Perl oczekuje znalezienia wartości skalarnej („w kontekście skalarnym”), da ci liczbę elementów w tablicy:

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

Dokumentacja perldata obejmuje to również w sekcji „Wartości skalarne” .

Jeśli oceniasz tablicę w kontekście skalarnym, zwraca ona długość tablicy. (Zauważ, że nie jest to prawdą w przypadku list, które zwracają ostatnią wartość, jak operator przecinka C, ani wbudowanych funkcji, które zwracają cokolwiek, jak im się wydaje, powrót). Zawsze jest tak:

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

Niektórzy programiści decydują się na użycie jawnej konwersji, aby nie pozostawiać wątpliwości:

$element_count = scalar(@whatever);

Wcześniej w tej samej sekcji opisano, jak uzyskać indeks ostatniego elementu tablicy.

Długość tablicy jest wartością skalarną. Możesz znaleźć długość tablicy @days, oceniając $#days, jak w csh. Nie jest to jednak długość tablicy; jest to indeks dolny ostatniego elementu, który ma inną wartość, ponieważ zwykle jest to 0 element.

Istnieją różne sposoby drukowania rozmiaru tablicy. Oto znaczenie wszystkich: Powiedzmy, że nasza tablica jestmy @arr = (3,4);

Metoda 1: skalar

To właściwy sposób na uzyskanie rozmiaru tablic.

print scalar @arr;  # prints size, here 2

Metoda 2: Numer indeksu

$#arrdaje ostatni indeks tablicy. więc jeśli tablica ma rozmiar 10, to jej ostatni indeks wynosiłby 9.

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

Dodajemy tutaj 1, biorąc pod uwagę tablicę jako 0-indeksowaną . Ale jeśli nie jest to zero, logika się nie powiedzie .

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

Powyższy przykład drukuje 6, ponieważ ustawiliśmy jego początkowy indeks na 4. Teraz indeks będzie wynosił 5 i 6, odpowiednio z elementami 3 i 4.

Metoda 3:

Gdy tablica jest używana w kontekście skalarnym, zwraca rozmiar tablicy

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

W rzeczywistości metoda 3 i metoda 1 są takie same.

Z perldoc perldata , które powinno być bezpiecznie cytować:

Zawsze spełnione są następujące warunki:

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

Tak długo, jak nie będziesz # $ ++ i w tajemniczy sposób zwiększysz rozmiar lub swoją tablicę.

Indeksy tablicowe zaczynają się od 0.

i

Możesz skrócić tablicę do zera, przypisując jej pustą listę (). Następujące są równoważne:

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

To prowadzi mnie do tego, czego szukałem, czyli do wykrycia, że ​​tablica jest pusta. Znalazłem, jeśli $ # pusty == -1;

A int(@array)może zagraża argumentowi skalarnemu.

Aby znaleźć rozmiar tablicy, użyj scalarsłowa kluczowego:

print scalar @array;

Aby znaleźć ostatni indeks tablicy, istnieje $#(zmienna domyślna Perl). Daje ostatni indeks tablicy. Gdy tablica zaczyna się od 0, otrzymujemy rozmiar tablicy, dodając jedną do $#:

print "$#array+1";

Przykład:

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

Wynik:

3

3