Array-Slice mit .. Aufzählung (Allgemeines zu Perl)

[thread]15025[/thread]

Array-Slice mit .. Aufzählung

Leser: 19

Articles: hide open all | hide show old branches

+6 replies
GwenDragon

2010-05-16 18:07
User since
2005-01-17
14749 Artikel
Admin1
Ich bin gerade über folgendes gestolpert.
Keine Ahnung warum ich diese seltsame Idee hatte. Da fehlt mir wohl gerade ein starker Kaffee ;)
Aber ich bin sicher, so mancher Anfänger hätte gern eine Erklärung.
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13

#!/usr/bin/perl use strict; use warnings; my @t = localtime(time); #sollte Stunden, Minuten, Sekunden ausgeben print @t[2-0], "\n"; print @t[2..0], "\n"; print "-------------------\n"; print @t[0-2], "\n"; print @t[0..2], "\n";
Zu kann @t[2-0] und @t[0-2] ich nur folgendes sagen:
Es ist zwar intuitiv das als von-bis zu denken, aber es ergibt keinen Slice, weil Perl 2-0 bzw. 0-2 als einen einzigen Index berechnet und somit keine "Reihe" von 2 bis 0 bzw. 0 bis 2 erzeugt.

Der Range operator ..
Warum aber 0..2 eine aufsteigende Reihe, 2..0 aber keine absteigende Reihe von Zahlen ergibt, weiß ich nicht. Ich nehme mal an, das absteigend einfach nicht implementiert ist.
Kann ja vielleicht jemand erklären.
Last edited: 2010-05-16 18:08:49 +0200 (CEST)
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +3 replies
- pq
  
  2010-05-16 18:10
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  aus perlop:
  
  Quote
  Range Operators
  Binary ".." is the range operator, which is really two different operators depending
  on the context. In list context, it returns a list of values counting (up by ones)
  from the left value to the right value. If the left value is greater than the right
  value then it returns the empty list.
  
  warum das so implementiert ist, kann ich dir allerdings auch nicht sagen =)
  will man eine absteigende folge, braucht man reverse().
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +2 replies
  - pq
    
    2010-05-16 18:13
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    2010-05-16T16:10:28 pq
    warum das so implementiert ist, kann ich dir allerdings auch nicht sagen =)
    
    es ist aber so, dass eine änderung nicht abwärtskompatibel wäre, da man sich eventuell auf das verhalten verlässt, z.b.
    
    Code (perl): (dl )
    
    1 2
    
    for ($start .. $end ) { }
    
    hat man hier $end kleiner als start, wird die schleife einfach nicht ausgeführt (was ganz praktisch ist, da man vorher keine if-abfrage machen muss). würde man das jetzt ändern, würden viele programme wohl unerwartetes tun.
    Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
    lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
    - GwenDragon
      
      2010-05-16 19:01
      
      User since
      2005-01-17
      14749 Artikel
      Admin1
      
      In dem Fall leuchtet mir das ein, wenn Anfang .. Ende gemeint ist.
      
      Manches liest sich zwar intuitiv in Perl, ist es aber dann doch nicht.
      
      Im Grunde genommen habe ich immer wenn ich den range operator verwendet habe, das als aufsteigend gedacht und so im Programm behandelt.
      Sowas wie im Startpost passiert, wenn man müde ist und der Geist abschweift. ;)
      Last edited: 2010-05-16 19:03:28 +0200 (CEST)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- +2 replies
- Taulmarill
  
  2010-05-17 11:50
  
  User since
  2004-02-19
  1750 Artikel
  BenutzerIn
  
  Kann es sein, dass du bei @t[2-0] Reguläre Ausdrücke mit Perl durcheinander bringst? Perl rechnet 2-0 aus, also zwei minus null gleich zwei.
  Innerhalb eines Regulären Ausdrucks wäre [0-2] dann eine Zeichenklasse, die den Zeichen 0, 1 und 2 entspricht. [2-0] ergibt in einem Regex allerdings eine Fehlermeldung.
  $_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B
  - GwenDragon
    
    2010-05-17 12:04
    
    User since
    2005-01-17
    14749 Artikel
    Admin1
    
    Ja, dass der Index bei @t[2-0] berechnet wird, schrieb ich ja schon. ;)
    Nein, ich bringe nicht RegEx und Slices durcheinander.
    
    Wie gesagt mein Gedankengang schwiff wohl ab und wollte intuitiv was hinschreiben.
    Ich bin ja auch noch am Rätseln was diese seltsame Idee zu den Indizes der Slices initiiert hatte.
    die Drachin Gwen
    
    Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2010-05-16 18:07.