Perl Programmierung - Grundkurs

wird ein Skalar zurückgegeben. Entsprechend muss von Ihnen dann auch das Datentypsymbol für Skalare angegeben werden:
     
    #!C:\perl\bin\perl.exe -w
     
    my @liste = qw(1 2 3);
    print $liste[0];               # 1
     
     
    #!C:\perl\bin\perl.exe -w
     
    my @liste = qw(a b c);
    print @liste;              # abc
     
     
    #!C:\perl\bin\perl.exe -w
     
    my @liste = ("a".."z");
    print @liste[0,2];              # ac
     
     
     
     
     
     

Elemente  verändern
     
    Um einen Listenelement  zu verändern,  bedient man sich ebenfalls der Indeces.
     
    $liste[0] = 3;                             # Das erste Listenelement  erhält den Wert 3
    ++$liste[0];                             # Der Wert des ersten Listenelements wird um 1 erhöht (4)
     
     

Das letzte Element
     
    Das letzte Element hat die Index-Nurmmer (Anzahl der Elemente -1). Um das letzte Element  anzusprechen, benutzt  man die Zahl -1. Die Nummer -2 stellt somit das vorletzte  Element  dar.
     
    My @liste = (1, 2, 3, 4);
    print  $liste[-1];
    print $liste[-2];
     
     

Vertauschen von Werten
     
    ( $b, $a ) = ( $a, $b );
     
     

Listen  in Listen
     
    my @liste ( ( 1, 2 ), (3, 4 ) );               # ( 1, 2, 3 ,4 )
     
    my @werktage = qw( Mo Di Mi Do Fr );
    my @wochend = qw( Sa So );
    my @woche  = qw( @werktage, @wochend )
     
     

Elemente  hinzufügen
     
    Die Funktion  push   hängt eine Liste  an eine  andere  hinten  dran:
     
    push @liste, 4, 5, 6;                            # 4, 5, 6 hinten  anhängen
     
    Ohne  die Funktion push   würde  es so gehen:
     
    @liste = (@liste, 4, 5, 6);
     
     
     
     
     
     
     
     
    Die Funktion  unshift fügt vorne  ein Listenelement e ein:
     
    my @liste  = ( 3, 4, 5 );
    unshift @liste,  1, 2;                             # vorne  einfügen
     
     

Elemente  entfernen
     
    Die Funktion pop entfernt das letzte  Elemennt
     
    my @liste = (1, 2, 3);
    pop @liste;
    print @liste;                            # 12
    
     
    Die Funktion  shift entfernt  ein Elemente von vorne.
     
    my @liste = (1, 2, 3);
    shift @liste;
    print @liste;                            # 23
    
     
     

Umdrehen einer Liste
     
    Eine Liste wird mit der Funktion reverse   umgedreht.
     
    print  reverse 1, 2, 3, 4;                            # 4321
     
    Im obigen Beispiel erhalten wir die umgedrehte  Liste nur als Ausgabewert auf dem Bildschirm.
    Um eine Liste selbst umzudrehen, müssen Sie also schreiben:
     
    @liste = reverse  @liste;
     
     

Sortieren  einer Liste
     
    Das gilt auch für das Sortieren einer Liste mit der Funktion  sort :
    Um die Liste selbst zu sortieren, müssen Sie schreiben:
     
    @liste  =  sort  @liste;
     
     

Hashes
     
    Der Präfix als Datentyp – Kennzeichen ist beim Hash das %-Zeichen.
    Die Elemente  in einem Hash sind Skalare. Die Elemente  werden mit einem Index angesprochen, dieser wird in geschweifte Klammern gesetzt.
     
    $hash{“Hans”} = “Meier”;
     
    Im Beispiel weisen wir dem  Index Hans den Wert Meier zu.
     
     
    Schlüssel/ Index und Werte
     
    Die Werte in einem Hash liegen als Paar vor: Index, Wert zum Index.
     
    Die Zuweisung von Werten  geschieht mit Hilfe von Listen.
     
    my %namen = (
                  Hans => Meier,
                  Dieter => Schmidt
                  );
    print “Hans $namen{Hans}”;               # Hans Meier
     
           Sie dürfen einem Hash eine Liste zuweisen, wenn diese Liste eine gerade Zahl von Elementen enthält, die dann als Paare (Schlüssel, Wert) verstanden werden.
     
           Das Symbol => ist eine andere Schreibweise für ein Komma! Es gibt in neuen Versionen von Perl einen Seiteneffekt:
Ein Wort auf der linken Seite des Pfeils wird als String interpretiert, auch wenn keine Anführungszeichen angegben wind. Das Wort Hans ist darum ein String.
     
           Hash – Elemente werden interpoliert, ein ganzer Hash dagegen nicht: %hash bleibt auch in doppelten Anführungsstrichen stehen.
     
    Sie können eine Liste einfach einem Hash zuweisen:
     
    my @liste = (A, 1, B, 2);
    my %hash = @liste;                             # A => 1, B=> 2
     
    Hashes können auch kopiert werden:
     
    my %hash1 = ( X