Textverarbeitung mit Perl

Perl Praxis 1

Wie bei allen Programmiersprachen (und Sprachen überhaupt) ist die Praxis ein wichtiger Bestandteil des Lernens. Jede Sitzung wird also einen praktischen Teil beinhalten. Die zu lösenden Aufgaben sollen Anfang der nächsten Sitzung eingereicht werden.

In dieser ersten praktischen Übung geht es erst einmal um ganz einfache Sachen: input und output und der generelle Umgang mit Perl.


Alle Perl Programme sollten das Suffix .pl haben. So wissen Perl und der Computer, dass dies ein Perl Programm sein soll.

Erstellung eines Perl Programms: mittels gängiger Editoren (emacs, vi, TextWrangler, BBedit, TextEdit, Notepad, etc.).

Ein erstes Programm
#!/usr/local/bin/perl
#welt.pl

#simple first program
$string = "Hallo Welt!\n";   #Zuweisung eines Wertes
print $string;               #Befehl/Output 

Das Programm

Übung 1.1. Kopiere oder tippe das Programm in einen Editor und probiere es aus.
Übung 1.2. Was macht das Programm ohne \n?

Ein weiteres Programm
#!/usr/local/bin/perl
#name.pl

print "Wie heisst Du? ";
$name = <STDIN>;            #Wert von Variable ist standard input
chomp($name);                     #entferne \n vom Input
print "\nHallo, $name!\n";  

Übung 1.3. Tippe das Programm ein und probiere es aus.
Übung 1.4. Kommentiere die Zeile chomp($name); aus, dann probiere diese Version des Programms aus.

Zählen
#!/usr/local/bin/perl
#name2.pl

print "Wie heisst Du? ";
$name = <STDIN>;            #Wert von Variable ist standard input
chomp($name);                     #entferne \n vom Input
$size = length($name);             #Laenge der Zeichenkette
print "\nHallo, $name!\n";        
print "Dein Name hat $size Buchstaben.\n";

Übung 1.5. Tippe das Programm ein und probiere es aus.
Übung 1.6. Was passiert wenn man Vor- und Nachnamen eingibt? Ist das Resultat richtig?
Übung 1.7. Kopiere das Programm in eine andere Datei (mit einem anderem Namen) und ändere es so, dass es als Input eine Stadt nimmt, und der Output so wie in der zweiten Zeile aussieht:
Wo kommst Du her? Konstanz 

Konstanz ist nett und hat 8 Buchstaben.


Rechnen
#!/usr/local/bin/perl
#multiply.pl

print "Bitte gib eine Zahl ein: ";
$num1 = <STDIN>;                  #Wert von Variable ist standard input

print "Bitte gib noch eine Zahl ein: ";
$num2 = <STDIN>;                 #Wert von Variable ist standard input

chomp($num1);                       #entferne \n vom Input
chomp($num2); 

print "Multipliziert ergibt das ", $num1 * $num2, ".\n";    #drucke Resultat 

Dieses Programm nimmt zwei Inputs an (nacheinander), verstaut sie in Variablen, entfernt jeweils den Zeilenumbruch (\n) und multipliziert dann die Werte.

Übung 1.8. Tippe das Programm ein und probiere es aus.
Übung 1.9. Anstatt des *, füge den Wiederholoperator x ein. Wie verändert sich die Ausgabe des Programms?
Übung 1.10. Gib jetzt statt 2 Zahlen, eine Zeichenkette (Wort) und eine Zahl ein. Wie sieht das Resultat des Programms jetzt aus?


Bitte die Übungen bei Anja Leiderer einreichen!

Ende