ฉันดูเหมือนจะเจอวิธีที่แตกต่างกันหลายวิธีในการหาขนาดของอาร์เรย์ ความแตกต่างระหว่างสามวิธีนี้คืออะไร?

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

วิธีแรกและวิธีที่สามเหมือนกัน: พวกเขาประเมินอาร์เรย์ในบริบทสเกลาร์ ฉันคิดว่านี่เป็นวิธีมาตรฐานในการรับขนาดของอาร์เรย์

วิธีที่สองส่งคืนดัชนีสุดท้ายของอาร์เรย์ซึ่งไม่เหมือนกับขนาดอาร์เรย์

ครั้งแรกที่สองไม่เทียบเท่ากับอีกสอง $#arrayส่งคืนดัชนีสุดท้ายของอาเรย์ซึ่งน้อยกว่าขนาดของอาเรย์

อีกสองอันนั้นเหมือนกัน คุณใช้วิธีที่ต่างกันสองวิธีในการสร้างบริบทสเกลาร์ มันเป็นคำถามที่อ่านง่าย

โดยส่วนตัวแล้วฉันชอบสิ่งต่อไปนี้:

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

ฉันคิดว่ามันชัดเจนกว่า

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

และ

my $size = @array;
say $size;

หลังดูค่อนข้างชัดเจนเพียงลำพังเช่นนี้ แต่ฉันพบว่าบรรทัดพิเศษจะไม่ได้ความชัดเจนเมื่อส่วนหนึ่งของรหัสอื่น มันมีประโยชน์สำหรับการสอนสิ่งที่@arrayทำในบริบทสเกลาร์และบางทีถ้าคุณต้องการใช้$sizeมากกว่าหนึ่งครั้ง

สิ่งนี้จะได้ขนาดโดยการบังคับให้อาร์เรย์เข้าสู่บริบทสเกลาร์ซึ่งจะถูกประเมินเป็นขนาด:

print scalar @arr;

นี่เป็นวิธีบังคับให้อาร์เรย์เข้าสู่บริบทสเกลาร์เนื่องจากถูกกำหนดให้กับตัวแปรสเกลาร์:

my $arrSize = @arr;

นี่จะได้รับดัชนีขององค์ประกอบสุดท้ายในอาร์เรย์ดังนั้นขนาดจริงลบ 1 (สมมติว่าดัชนีเริ่มต้นที่ 0 ซึ่งปรับได้ใน Perl แม้ว่าการทำเช่นนั้นมักเป็นความคิดที่ไม่ดี):

print $#arr;

อันสุดท้ายนี้ไม่ค่อยดีนักในการใช้ขนาดอาเรย์ มันจะมีประโยชน์ถ้าคุณเพียงแค่ต้องการรับองค์ประกอบสุดท้ายของอาร์เรย์:

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

นอกจากนี้อย่างที่คุณเห็นใน Stack Overflow โครงสร้างนี้ไม่ได้รับการจัดการอย่างถูกต้องโดยปากกาเน้นข้อความไวยากรณ์ส่วนใหญ่ ...

หากต้องการใช้วิธีที่สองเพิ่ม 1:

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

ทั้งสามให้ผลเหมือนกันถ้าเราแก้ไขอันที่สองบิต:

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;

ตัวอย่าง:

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

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

ส่วน“ ชนิดตัวแปร Perl”ของเอกสารประกอบ perlintroมี

ตัวแปรพิเศษ$#arrayบอกดัชนีขององค์ประกอบสุดท้ายของอาร์เรย์:

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

คุณอาจถูกล่อลวงให้ใช้$#array + 1เพื่อบอกคุณว่ามีกี่รายการในอาเรย์ ไม่รำคาญ ในขณะที่มันเกิดขึ้นการใช้@arrayที่ Perl คาดว่าจะหาค่าสเกลาร์ (“ ในบริบทสเกลาร์”) จะทำให้คุณมีจำนวนองค์ประกอบในอาร์เรย์:

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

เอกสาร perldataยังครอบคลุมถึงนี้ใน“ค่าเกลา” ส่วน

หากคุณประเมินอาร์เรย์ในบริบทสเกลาร์มันจะคืนค่าความยาวของอาร์เรย์ (โปรดทราบว่านี่ไม่เป็นความจริงของรายการซึ่งคืนค่าสุดท้ายเช่นตัวดำเนินการเครื่องหมายจุลภาค C หรือฟังก์ชันในตัวซึ่งส่งคืนสิ่งที่พวกเขารู้สึกอยากกลับมา) สิ่งต่อไปนี้เป็นจริงเสมอ:

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

โปรแกรมเมอร์บางคนเลือกที่จะใช้การแปลงที่ชัดเจนเพื่อที่จะไม่ต้องสงสัยเลย:

$element_count = scalar(@whatever);

ก่อนหน้านี้ในส่วนเดียวกันเอกสารวิธีการรับดัชนีขององค์ประกอบสุดท้ายของอาร์เรย์

ความยาวของอาร์เรย์คือค่าสเกลาร์ คุณอาจพบความยาวของอาร์เรย์@daysโดยการประเมินในขณะที่$#days cshอย่างไรก็ตามนี่ไม่ใช่ความยาวของอาเรย์ มันคือตัวห้อยขององค์ประกอบสุดท้ายซึ่งเป็นค่าที่แตกต่างกันเนื่องจากโดยปกติแล้วจะเป็นองค์ประกอบที่ 0

มีหลายวิธีในการพิมพ์ขนาดของอาเรย์ นี่คือความหมายของทั้งหมด: สมมติว่าอาร์เรย์ของเราคือmy @arr = (3,4);

วิธีที่ 1: เกลา

นี่เป็นวิธีที่เหมาะสมในการรับขนาดของอาร์เรย์

print scalar @arr;  # prints size, here 2

วิธีที่ 2: หมายเลขดัชนี

$#arrให้ดัชนีสุดท้ายของอาร์เรย์ ดังนั้นถ้าอาร์เรย์มีขนาด 10 ดังนั้นดัชนีสุดท้ายจะเป็น 9

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

เรากำลังเพิ่ม 1 ที่นี่พิจารณาอาร์เรย์เป็น0 การจัดทำดัชนี แต่ถ้ามันไม่ได้ขึ้นอยู่กับศูนย์แล้วตรรกะนี้จะล้มเหลว

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

ตัวอย่างข้างต้นพิมพ์ 6 เพราะเราได้ตั้งค่าดัชนีเริ่มต้นเป็น 4 ตอนนี้ดัชนีจะเป็น 5 และ 6 โดยมีองค์ประกอบ 3 และ 4 ตามลำดับ

วิธีที่ 3:

เมื่ออาร์เรย์ถูกใช้ในบริบทสเกลาร์แล้วจะส่งคืนขนาดของอาร์เรย์

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

จริงๆแล้ววิธีที่ 3 และวิธีที่ 1 เหมือนกัน

จาก perldoc perldataซึ่งควรปลอดภัยที่จะพูด:

ต่อไปนี้เป็นจริงเสมอ:

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

ตราบใดที่คุณไม่ได้ $ # อะไรก็ตาม ++ และเพิ่มขนาดหรืออาเรย์ของคุณอย่างลึกลับ

ดัชนีอาร์เรย์เริ่มต้นด้วย 0

และ

คุณสามารถตัดทอนอาเรย์ลงเป็นอะไรก็ได้โดยกำหนดรายการ null () ให้กับมัน สิ่งต่อไปนี้เทียบเท่า:

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

ซึ่งนำฉันไปยังสิ่งที่ฉันกำลังมองหาซึ่งเป็นวิธีการตรวจสอบอาร์เรย์ว่างเปล่า ฉันพบว่าถ้า $ # ว่าง == -1;

สิ่งที่เกี่ยวกับint(@array)มันขู่ว่าอาร์กิวเมนต์เป็นเซนต์คิตส์และเนวิส

ในการหาขนาดของอาร์เรย์ให้ใช้scalarคำสำคัญ:

print scalar @array;

เพื่อหาดัชนีสุดท้ายของอาร์เรย์จะมี$#(ตัวแปรเริ่มต้น Perl) มันให้ดัชนีสุดท้ายของอาร์เรย์ ในฐานะที่เป็นอาร์เรย์เริ่มต้นจาก 0 เราจะได้รับขนาดของอาร์เรย์โดยเพิ่มหนึ่งใน$#:

print "$#array+1";

ตัวอย่าง:

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

เอาท์พุท:

3

3