Bir dizinin boyutunu bulmak için birkaç farklı yolla rastladım. Bu üç yöntem arasındaki fark nedir?

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

Birinci ve üçüncü yollar aynıdır: bir diziyi skaler bağlamda değerlendirirler. Bu bir dizi boyutu almak için standart bir yol olarak düşünürdüm.

İkinci yol aslında dizinin (genellikle) dizi boyutuyla aynı olmayan son dizini döndürür.

Birincisi, ikincisi diğer ikisine eşdeğer değildir. $#arraydizinin boyutundan bir küçük olan dizinin son dizinini döndürür.

Diğer ikisi neredeyse aynı. Skaler bağlam oluşturmak için iki farklı yol kullanıyorsunuz. Okunabilirlik meselesi geliyor.

Şahsen aşağıdakileri tercih ederim:

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

Daha net buluyorum

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

ve

my $size = @array;
say $size;

İkincisi bu şekilde tek başına oldukça net görünüyor, ancak ekstra satırın diğer kodun bir parçası olduğunda netlikten uzaklaştığını görüyorum. @arraySkaler bağlamda neler yaptığını öğretmek için faydalıdır ve belki de $sizebirden fazla kullanmak istiyorsanız .

Bu, diziyi boyut olarak değerlendirildiği skaler bir bağlama zorlayarak boyutu alır:

print scalar @arr;

Bu, diziyi skaler bir değişkene atandığı için diziyi skaler bir bağlama zorlamanın başka bir yoludur:

my $arrSize = @arr;

Bu, dizideki son öğenin dizinini alır, bu nedenle aslında eksi 1 boyutudur (dizinlerin 0'da başladığını varsayarsak, bunu yapmak genellikle kötü bir fikir olsa da Perl'de ayarlanabilir):

print $#arr;

Bu sonuncusu dizi boyutunu elde etmek için kullanmak gerçekten iyi değil. Dizinin son öğesini almak istiyorsanız yararlı olacaktır:

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

Ayrıca, burada Stack Overflow'da da görebileceğiniz gibi, bu yapı sözdizimi vurgulayıcılarının çoğu tarafından doğru şekilde ele alınmamaktadır ...

İkinci yolu kullanmak için 1 ekleyin:

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

İkincisini biraz değiştirirsek her üçü de aynı sonucu verir:

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;

Misal:

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

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

“Perl değişken türleri” bölümüne ait perlintro belgelerine içerir

Özel değişken $#arraysize bir dizinin son elemanının dizinini söyler:

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

$#array + 1Bir dizide kaç öğe olduğunu size bildirmek için cazip olabilirsiniz . Rahatsız etme. Olduğu gibi, @arrayPerl'in bir skaler değer bulmayı beklediği yeri kullanmak (“skaler bağlamda”) dizideki öğe sayısını verecektir:

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

Perldata belgeler de bu kapakları “Skaler değerler” bölümünde .

Bir diziyi skaler bağlamda değerlendirirseniz, dizinin uzunluğunu döndürür. (Bunun, C virgül operatörü gibi son değeri döndüren listeler veya geri dönmek istediklerini döndüren yerleşik işlevler için geçerli olmadığını unutmayın.) Aşağıdakiler her zaman doğrudur:

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

Bazı programcılar şüphesiz hiçbir şey bırakmamak için açık bir dönüşüm kullanmayı tercih eder:

$element_count = scalar(@whatever);

Aynı bölümün başlarında, bir dizinin son öğesinin dizininin nasıl elde edileceğini belgeler.

Bir dizinin uzunluğu skaler bir değerdir. Dizinin uzunluğunu , olduğu gibi @daysdeğerlendirerek bulabilirsiniz . Ancak, bu dizinin uzunluğu değildir; normalde 0'cı eleman olduğundan farklı bir değer olan son elemanın aboneliğidir.$#dayscsh

Dizi boyutunu yazdırmanın çeşitli yolları vardır. İşte hepsinin anlamları: Diyelim ki dizimizmy @arr = (3,4);

Yöntem 1: Skaler

Dizilerin boyutunu elde etmenin doğru yolu budur.

print scalar @arr;  # prints size, here 2

Yöntem 2: Dizin numarası

$#arrdizinin son dizinini verir. yani dizi 10 büyüklüğündeyse, son dizini 9 olur.

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

Diziyi 0 dizinli olarak kabul ederek 1 ekliyoruz . Ancak, sıfır tabanlı değilse, bu mantık başarısız olacaktır .

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

Yukarıdaki örnek 6'yı yazdırır, çünkü başlangıç ​​dizinini 4 olarak ayarladık. Şimdi dizin sırasıyla 3 ve 4 ile 5 ve 6 olacaktır.

Yöntem 3:

Bir dizi skaler bağlamda kullanıldığında, dizinin boyutunu döndürür

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

Aslında yöntem 3 ve yöntem 1 aynıdır.

Perldoc itibaren perldata alıntı güvenli olmalı,:

Aşağıdakiler her zaman doğrudur:

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

Sadece $ # ne olursa olsun ++ $ ve gizemli bir şekilde boyutu veya dizi artırmak sürece.

Dizi indeksleri 0 ile başlar.

ve

Bir null listesini () atayarak bir diziyi hiçbir şey için kısaltabilirsiniz. Aşağıdakiler eşdeğerdir:

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

Bu da beni aradığım şeye götürüyor, bu da dizinin nasıl tespit edileceğinin boş olduğu. $ # Empty == -1;

Peki ya int(@array)argümanı skaler olarak tehdit ettiği için.

Bir dizinin boyutunu bulmak için scalaranahtar kelimeyi kullanın :

print scalar @array;

Bir dizinin son dizinini bulmak için $#(Perl varsayılan değişkeni) vardır. Bir dizinin son dizinini verir. Bir dizi 0'dan başladığında, diziye bir tane ekleyerek dizinin boyutunu elde ederiz $#:

print "$#array+1";

Misal:

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

Çıktı:

3

3