Perl

Question 1

Erläutern Sie den grundlegenden Unterschied zwischen der Verwendung von my bzw. local:

Accepted Answer

my: innerhalb eines Blockes; bei der Initialisierung einer Variablen, wird immer eine neue Speicheradresse reserviert / genutzt; -> lexikalischer Scope local: innerhalb eines Blockes; bei der Initialisierung einer Variablen, wird der alte Wert überschreiben und gemerkt. Die neue Variable nutzt für den Wert die gleiche Speicheradresse. Am Abschluss des Blockes wird der auf dem Stack abgelegte und gemerkte Wert wieder zurück geschrieben; -> dynamischer Scope

Question 2

Welche Warnmeldung zieht ein use warnings; nach sich?

Accepted Answer

use warnings; generiert eine Fehlermeldung wenn auf eine nicht initialisierte Variable lesenden zugegriffen wird.

Question 3

Welche Probleme können sich aus dem Verzicht auf use strict; und der unterlassenen Deklaration von Variablen mit my ergeben?

Accepted Answer

Benutzerfehler bei der Initialisierung oder Verwendung von Variablen, können nicht abgefangen werden.

Question 4

Durch welche Anweisung hätten Sie den zentralen Fehler in folgendem kleinen Programm bereits vor der Ausführung beheben finden können?

Accepted Answer

Durch die Verwendung von use strict; und use warnings;.

Question 5

Was verhindert die Verwendung von use warnings?

Accepted Answer

Das eine Warnmeldung ausgegeben wird, sobald lesen auf eine nicht initialisierte Variable zugegriffen wird.

Question 6

Wie können Sie ein File quasi auf einen Rutsch einlesen, d.h. ohne explizit in einer Schleife über die einzelnen Records laufen zu müssen?

Accepted Answer

Mit dem Recordseperator; dieser wird auf undef gesetzt

Question 7

Was gibt print eval(join(`-`(1..5)))aus?

Accepted Answer

-13

Question 8

Mit welcher Perl-Funktion können Sie zwanglos die mathematische Signum-Funktion nachbilden?

Accepted Answer

(sign(x) = 1, falls x > 0, sign(x) = 0, falls x = 0, sign(x) = -1, falls x < 0).

Question 9

Mit welcher Perl-Funktion können Sie zwanglos die mathematische Signum-Funktion nachbilden?

Accepted Answer

(sign(x) = 1, falls x > 0, sign(x) = 0, falls x = 0, sign(x) = -1, falls x < 0). Geben Sie den Code für eine Subroutine namens an, die genau dieses ohne tut (verwenden Sie hierbei auch nicht den ?-Operator).

Question 10

Mit welcher Perlfunktion können zwangslos die mathematische Signum-Funktion nachbilden? Geben Sie den Code für eine Subroutine namens sign an, die genau diese ohne if/else tut (Verwenden Sie auch nicht den ?-Operator)

Accepted Answer

Mit dem ternären Operator <=>

Question 11

Wie können Sie einen Hash, der bekannt aus Keys und diesen zugeordneten Values besteht, umdrehen, d.h. einen Hash erzeugen, der eine Zuordnung in der quasi anderen Richtung ermöglicht?

Accepted Answer

mit der Funktion reverse %h = reverse %h

Question 12

Warum kann ein Hash durch reverse umgedreht werden? Was geschieht mit den keys und values?

Accepted Answer

Warum liefert my %r = reverse %h einen neuen Hash %r, dessen Keys aus den Werten von %h besteht? Weil ein Hash ein ganzzahliges Array ist.

Question 13

Worin besteht das Problem beim Umdrehen von Hashes?

Accepted Answer

Die Werte können mehrfach vorhanden sein. Werden die Werte dann zu keys, haben Sie keine Eindeutigkeit mehr. Mehrfach vorhandene Keys werden gegenseitig ersetzt. Somit ist es nicht mehr möglich den Keys die passenden Werte zuzuordnen.

Question 14

Erläutern Sie den Unterschied bzgl. der Verwendung einfacher und doppelter Anführungszeichen.

Accepted Answer

Einfache Anführungszeichen: - Zeichenketten und Steuerzeichen werden nicht weiter interpretiert. Ausgabe unverändert doppelte Anführungszeichen: - Zeichenketten und Steuerzeichen werden interpretiert bzw. ausgewertet

Question 15

Was liefert die Auswertung eines Arrays im skalaren Kontext zurück?

Accepted Answer

Die Anzahl der im Array enthaltenen Skalare.

Question 16

Wie könnten Sie dieses Problem vermeiden?

Accepted Answer

Es muss eine Referenz angegeben werden. Das Array @feld müsste die Referenz erhalten => \@feld

Question 17

Wie kann das Problem gelöst werden?

Accepted Answer

Entweder muss das Array als eine Reverenz angegeben werden oder die Variablen müssen umgedreht werden.

Question 18

Geben Sie ein map-Statement an, mit dessen Hilfe Sie alle Elemente eines Arrays (nur die numerischen Werte enthält) um zwei zu erhöhen.

Accepted Answer

map 2 $_ += 2 3@array;

Question 19

Was ist eine Closure?

Accepted Answer

Eine Closure ist eine Subroutine, die als Rückgabewert eine Subroutine hat. Closures erlauben Funktionen bzw. Subroutinen und Variablen aus ihrem Umfeld mitzunehmen. Führt zu OOP. Eine Subroutine die eine andere Subroutine aufruft

Question 20

Geben Sie einen regulären Ausdruck an, mit dessen Hilfe Datumsangeben der Form DD-MMM-YYYY gematched werden können, wobei der dreistellige Monat als Buchstabenkürzel angegeben wird-

Accepted Answer

/^\d{2} - \w{3}- \d{4} $/ oder m / ^\d\d - \w\w\w- \d\d\d\d $/

Question 21

Geben Sie einen regulären Ausdruck für eine IPAdresse (192.168.31.16) an. Dabei wird nicht berücksichtigt, dass es nur bis Zahl 255 geht. Aber es muss gewährleistet sein, dass die Zahlen zwischen 1 und 3 Stellen haben können.

Accepted Answer

/^(\d{1-3}\.){3}(\d{1-3}) oder m/^(\d{1-3}\.)(\d{1-3}\.)(\d{1-3}\.)(\d{1-3})

Question 22

Geben Sie eine regulären Ausdruck für eine Dezimal oder Gleitkommazahl an. Geben Sie den Exponenten mit einem E an.

Accepted Answer

/^[+-]?\d+(\.\d*)?(E[+-]?\d+)?$

Question 23

Welchen Vorteil bitet die Verwednung von Dispatchtabellen im Vergleich zu quasi traditionellen Strukturen wie einem switch/case-Kostrukt?

Accepted Answer

- Sau schnell, da mit Hash - Dynamisch - Erweiterbar! - Weniger Logik zu implementieren - Wartbar

Question 24

Geben Sie ein Statement an, mit dessen Hilfe Sie eine Referenz auf ein Array namens @feld einem Skalar $ref zuweisen.

Accepted Answer

$ref = \@feld;

Question 25

Warum kann ein Statementmodifier einer for-Schleife auf $_ zurückgreifen? Warum geht es bei folgendem Programm nicht?

Accepted Answer

my $summe = 0; $summe += $wert for my $wert [1..100]

Question 26

Warum kann ein Statementmodifier einer for-Schleife auf $_ zurückgreifen? Warum geht es bei folgendem Programm nicht?

Accepted Answer

my $summe = 0; $summe += $wert for my $wert [1..100] Weil die Variablen bei jedem Schleifendurchlauf neu initialisiert werden müssten Wegen der Initialisierung.

Question 27

Warum müssen mehrdimensionale Felder in Perl stets als Array aus Referenzen auf Array aus Referenzen ... Umgesetz werden?

Accepted Answer

Weil ein Element eines Hashes immer ein Skalar ist. Weil Referenzen auf Datenstrukturen wie Arrays oder Hashes der Schlüssel zur Generierung verschachtelter Datenstrukturen sind.

Question 28

Was tut $data =~ tr/a-z/A-Z?

Accepted Answer

tr ersetzt alle Kleinbuchstaben von a-z durch Grußbuchstaben.

Question 29

Sie haben einen Hash my %h = qw(abc 16 def 3 geh 82 ijk 12); Geben Sie bitte ein Statement an, das Hashes sortiert und nach Values mit dessen Schlüssel ausgibt.

Accepted Answer

print"$_	 $h ($_)"for sort(keys(%h));

Question 30

Mit welchem Statement kann eine Schleife vorzeitig beendet werden?

Accepted Answer

last;

Question 31

Mit welchem Statement kann man mitten in einer Schleife den Beginn eines neuen Schleifendurchlaufs erzwingen?

Accepted Answer

next; redo;

Perl (Fach) / Perl (Lektion)