CGI Einführung - Lernen Sie Perl

CGI 4 - Variablen

Sie wissen nun wie man ein einfaches Skript schreibt. Da das Skript jedoch nur eine normale HTML Seite ausgibt hilft Ihnen das noch nicht viel. Nun wird ihr Wissen über CGI um das einsetzen

Unterkapitelindex

4.1 Was sind Variablen überhaupt
4.2 Skalare Variablen
4.3 Rechnungen
4.4 Ausgabe
4.5 Beispiel

4.1 Was sind Variablen überhaupt?
Einfach ausgedrückt sind Variablen Werte. Diese Werte können im Programm beliebig verändert, berechnet sowie aus- und eingegeben werden. Es gibt verschiedene Arten von Variablen, in diesem Kapitel möchten wir uns zuerst mit den Skalaren beschäftigen. Das sind Variablen die sowohl Strings (Zeichenketten wie zb. "abc") als auch Zahlen sein können.

4.2 Skalare Variablen
Wie schon in 4.1 beschrieben können Skalare Variablen jeden Inhalt haben - Egal ob Strings oder Zahlen.

Die skalaren Variablen müssen zuerst definiert werden, das geschieht mit dem Befehl

`01`	`my $variable;`

Dabei bedeutet das "My" das die Variable lokal deklariert wird. Das Dollar ($) Zeichen definiert die Variable als Skalar.

4.3 Rechnungen
Das Rechnen mit Variablen ist sehr einfach. Hier ein Beispiel für eine Addition von den Variablen "a" und "b".

01 02 03 04 05 06

my $x = 2;

														my $y = 3;

														

														my $z;

														

														$z = $x + $y; # z ist nun 5.

In diesem Beispiel sehen Sie gleichzeitig auch die Möglichkeit eine Variable direkt mit einem bestimmten Wert zu deklarieren (in diesem Beispiel x = 2 und y = 3), man hätte dort statt festen Werten auch eine Rechnung einsetzen könne, also beispielsweise

`01`	`my $z = $x + $y;`

Damit jedoch auch der normale Weg zur Rechnung bekannt ist habe ich die Rechnung in diesem Fall in eine zweite Zeile geschrieben. Der Text hinter dem "#" ist übrigens ein Kommentar, dort kann jeder beliebige Text stehen - Nach einem "#" wird die restliche Zeile nicht mehr beachtet.

Natürlich gibt es noch viele weitere Rechenarten:

01 02 03 04 05

 $z = $x + $y; # Addition; z = 5

														$z = $x - $y; # Subtraktion; z = -1

														$z = $x * $y; # Multiplikation; z = 6

														$z = $x / $y; # Division; z = 2/3

														$z = $x ** $y; # Potenzierung ($x hoch $y, in diesem Fall 2 * 2 * 2); z = 8

Desweiteren kann statt den Variablen auch eine Zahl oder eine Rechnung eingesetzt werden:

`01`	`$z = ((5 * 5) / 5) ** 2; # z = 25`

4.4 Ausgabe
Das Ausgeben der Variablen ist mit dem "print" Befehl möglich.

01 02

 $z = ((5 * 5) / 5) ** 2; # z = 25

														print "Das Erebnis ist: $z";

Man kann also die Variable einfach in die Hochkommas schreiben. Der Interpreter wird den Variablennamen durch den jeweiligen Wert der Variable ersetzen.

Desweiteren können Variablen auch verbunden durch einen "." ausgegeben werden:

01 02

 $z = ((5 * 5) / 5) ** 2; # c = 25

														print 'Das Erebnis ist: ' .$z. ' !';

Das erhöht die Übersichtlichkeit und wird insbsd. bei Arrays empfohlen.

4.5 Beispiel
Hier ein kleines Beispielprojekt das verdeutlicht wie Variablen nutzbar sind:

01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39

#!/usr/bin/perl -wT use strict; my $a = 5; my $b = 3; my $c;

print <<"EOF"; Content-Type:text/html <html> <head><title>Rechner</title></head> <body> EOF #### Addition #### $c = $a + $b; print "$a + $b = $c "; #### Subtraktion #### $c = $a - $b; print "$a - $b = $c "; #### Multiplikatioin #### $c = $a * $b; print "$a * $b = $c "; #### Division #### $c = $a / $b; print "$a / $b = $c "; #### Potenzierung #### $c = $a ** $b; print "$a ** $b = $c "; print '</body>\n</html>'; # \n steht für einen Zeilenumbruch

Das Programm sollte soweit klar sein, es wurden keine neuen Befehle verwendet. Falls trotzdem Probleme auftreten sollten kontaktieren Sie mich bitte per E-Mail.