Hallo Jungs Ich versuche zu lernen, perl und haben einen einfachen Taschenrechner Ich versuche zu laufen, aber ich Fehler Runaway Multi-line. Kann jemand diese Nummer Rookie in die richtige Richtung.


# # #

print "Willkommen auf dem Rechner";
print 'Möchten Sie in den Rechner? Bitte geben Sie "Y" oder "n";
$ run \u003d <STDIN>;
chomp $ laufen;
while ($ run \u003d\u003d y)
(
(
print 'Add \u003d a | Subtrahieren \u003d s | Multiplizieren \u003d m | Divide \u003d d | Exponent \u003d e | Mod \u003d O';
print 'Geben Sie die entsprechende Anzahl der caluclation durchgeführt werden:';
$ calc \u003d <STDIN>;
chomp $ calc;
print "Bitte geben Sie den ersten Wert: ';
$ A \u003d <STDIN>;
chomp $ a;
print "Bitte geben Sie den zweiten Wert: ';
$ B \u003d <STDIN>;
chomp $ B;

if ($ calc \u003d\u003d a)
(
$ answer \u003d $ a + $ b;
)
elsif ($ calc \u003d\u003d n)
(
$ answer \u003d $ A - $ B;
)
elsif ($ calc \u003d\u003d m)
(
$ answer \u003d $ A * $ B;
)
elsif ($ calc \u003d\u003d d)
(
$ answer \u003d $ A / $ B;
)
elsif ($ calc \u003d\u003d e)
(
$ answer \u003d $ A ** $ B;
)
elsif ($ calc \u003d\u003d o)
(
$ answer \u003d $ A $% B;
)
print "Die Antwort ist $ Antwort."
)
print 'Möchten Sie eine weitere Berechnung? Bitte geben Sie "Y" oder "n";
$ run \u003d <STDIN>;
chomp \u003d $ run;
)


print "Die Anwendung ist jetzt beendet."

# # #