[perl-6.de] remove some occurences of =$var

git-svn-id: svn+ssh://faui2k3.org/var/lib/svn/moritz/perl-6.de@884 addfbb1e-f4f9-0310-b6f0-bccd0f9b8dc6

source/tutorials/anfaenger/if-anweisung.html

@@ -17,7 +17,7 @@ <h1>If - Bedingte Anweisungen</h1>
 <pre>[[[syntax perl6]]]
 use v6;
 
-my $zahl = =$*IN;
+my $zahl = $*IN.get;
 say sqrt $zahl;
 [[[endsyntax]]]</pre>
 
@@ -37,7 +37,7 @@ <h1>If - Bedingte Anweisungen</h1>
 <pre>[[[syntax perl6]]]
 use v6;
 
-my $zahl = =$*IN;
+my $zahl = $*IN.get;
 if $zahl < 0 {
     say "Kann keine Wurzel aus negativen Zahlen ziehen";
 } else {
@@ -84,7 +84,7 @@ <h1>If - Bedingte Anweisungen</h1>
 my $guthaben = 655.36;
 
 say "Geben Sie ihre PIN ein:";
-my $pin_eingabe = =$*IN;
+my $pin_eingabe = $*IN.get;
 
 if $pin == $pin_eingabe {
     say "Geben Sie den Betrag ein, den Sie abheben wollen:";
@@ -116,7 +116,7 @@ <h1>If - Bedingte Anweisungen</h1>
     <p>Dann wird folgender Code ausgeführt:</p>
 <pre>[[[syntax perl6]]]
     say "Geben Sie den Betrag ein, den Sie abheben wollen:";
-    my $auszahlung = =$*IN;
+    my $auszahlung = $*IN.get;
     if ($auszahlung <= $guthaben) {
         say "Nehmen Sie die $auszahlung Euro mit...";
         $guthaben = $guthaben - $auszahlung;
@@ -181,7 +181,7 @@ <h2>Vergleich von Strings</h2>
 use v6;
 # so ist es richtig
 my $passwort = "Geheim123";
-my $eingabe = =$*IN;
+my $eingabe = $*IN.get;
 
 if $passwort eq $eingabe {
     say "Passwort Korrekt, willkommen Chef";

source/tutorials/anfaenger/variablen.html

@@ -8,7 +8,7 @@ <h1>Variablen</h1>
     diesem Kapitel ändern.</p>
 
     <p>Alle Werte, die sich in einem Programm ändern können
-    während es ausgefährt wird, werden in <em>Variablen</em>
+    während es ausgeführt wird, werden in <em>Variablen</em>
     gespeichert.</p>
 
     <p>In Perl starten alle Variablen mit einem Sonderzeichen (sogenanntem
@@ -17,8 +17,8 @@ <h1>Variablen</h1>
 use v6;
 
 my $a;
-$a = =$*IN;
-my $b = =$*IN;
+$a = $*IN.get;
+my $b = $*IN.get;
 
 my $summe = $a + $b;
 
@@ -56,25 +56,25 @@ <h2>Das Programm im Detail</h2>
     verschiedene Variablen.</p>
 
 <pre>[[[syntax perl6]]]
-$a = =$*IN;
+$a = $*IN.get;
 [[[endsyntax]]]</pre>
     <p>Hier wird der Variable <code>$a</code> ein Wert zugewiesen. Der
     Wert steht auf der rechten Seite des Gleichheitszeichens, hier
-    <code>=$*IN</code>. Die besondere Variable <code>$*IN</code> steht für
+    <code>$*IN.get</code>. Die besondere Variable <code>$*IN</code> steht für
     alle Eingaben, die auf der Tastatur gemacht werden.
-    Die Konstruktion <code>=$*IN</code> weist Perl an, eine Zeile von
+    Die Konstruktion <code>$*IN.get</code> weist Perl an, eine Zeile von
     der Tastatur zu lesen, d.h. das Programm pausiert so lange, bis der
     Benutzer etwas eingegeben hat und dann auf Enter gedrückt hat.</p>
 
 <pre>[[[syntax perl6]]]
-my $b = =$*IN;
+my $b = $*IN.get;
 [[[endsyntax]]]</pre>
     <p>Diese beiden Zeilen machen das gleiche wie die drei Zeilen davor,
     nur dass die Eingabe dieses mal in der Variablen <code>$b</code>
     gespeichert wird.</p>
 
     <p>Die Deklaration <code>my $b;</code> und die Zuweisung <code>$b =
-    =$*IN;</code> wurden diesmal in eine Zeile zusammengezogen,
+    $*IN.get;</code> wurden diesmal in eine Zeile zusammengezogen,
     die das gleiche macht wie die beiden einzelnen Zeilen.</p>
 
 <pre>[[[syntax perl6]]]