Wie kann ich die ersten bis fünften vorletzten Array-Elemente in Perl drucken?

Question

Ich führe den folgenden Code aus und ich versuche, das erste Element in der @rainbow-Array durch das fünfte vorletzte Element in der @rainbow-Array zu drucken. Dieser Code funktioniert für beliebige positive Indizes innerhalb der Grenzen des Arrays, aber nicht für negative:

@rainbow = ("a".."z"); 
@slice = @rainbow[1..-5]; 
print "@slice\n"; 

Answer 1

Sie wollen

my @slice = @rainbow[0 .. $#rainbow - 5]; 

Seien Sie vorsichtig, 1 das zweite Element ist, nicht der erste.

Answer 2

Der .. Bediener eine range von links nach rechts Wert bildet - wenn das Recht größer oder gleich dem links. In Perl beginnt die Array-Indizierung auch bei Null.

Wie wäre es damit?

@slice = @rainbow[0..$#rainbow-5]; 

$#array gibt Ihnen den Index des letzten Elements im Array.

Answer 3

Aus den ersten beiden Sätzen für die range operator, dokumentiert in perlop:

Binary „..“ ist der Bereich Operator, der wirklich zwei verschiedene Operatoren ist abhängig vom Kontext. Im Listenkontext gibt es eine Liste von Werten zurück, die um den Einsen vom linken Wert zum rechten Wert zählen. Wenn der linke Wert größer als der rechte Wert ist, wird die leere Liste zurückgegeben.

Wenn der Code nicht funktioniert, zerlegen Sie ihn, um zu sehen, was passiert. Zum Beispiel würden Sie den Bereich Operator versuchen, um zu sehen, was es produziert:

my @indices = 1 .. -5; 
print "Indices are [@indices]\n"; 

Wenn Sie eine leere Liste bekam und erkannte, dass es etwas los ist, dass Sie nicht verstehen, überprüfen Sie die Dokumentation für was auch immer Sie sind versuchen zu tun, um zu überprüfen, dass es tut, was du denkst, dass es tun sollte. :)