Ciao ragazzi, sto cercando di imparare perl e hanno una semplice calcolatrice Sto cercando di correre, ma ho errore runaway multi-linea. Può qualcuno questo punto rookie nella giusta direzione.


# # #

print 'Benvenuti al Calcolatrice';
print 'Vuoi inserire la calcolatrice? Si prega di Tipo o n y ';
run \u003d $ <STDIN>;
chomp $ eseguire;
while ($ eseguire \u003d\u003d y)
(
(
print '\u003d Aggiungi a | Detrarre \u003d s | Moltiplica \u003d m | Divide \u003d d | Exponent \u003d e | \u003d Mod. O';
print 'Inserire il numero corrispondente alla caluclation da eseguire:';
\u003d $ calc <STDIN>;
chomp $ calc;
print 'Inserisci il primo valore:';
$ A \u003d <STDIN>;
chomp $ A;
print 'Si prega di inserire il secondo valore:';
\u003d $ B <STDIN>;
chomp $ B;

if ($ calc \u003d\u003d a)
(
$ answer \u003d $ A + $ B;
)
elsif ($ calc \u003d\u003d s)
(
$ risposta \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)
(
$ risposta \u003d $ a $ ** B;
)
elsif ($ calc \u003d\u003d o)
(
$ answer \u003d $ A $% B;
)
print "La risposta è $ risposta.";
)
print 'Vuoi effettuare un altro calcolo? Si prega di Tipo o n y ';
run \u003d $ <STDIN>;
chomp $ \u003d run;
)


print 'La domanda è ora chiuso.';

# # #