nicht angemeldet
______________________________
Hier kommt das Skript:
_____________________________
Das einige Macken hat, wie dir schon berichtet wurde.
Du solltest die Skripte (als Anfänger sowieso) immer mit eingeschalteten Warnungen und mit use strict schreiben.
#!/usr/bin/perl -w
use strict;
{
$eingabe == 1 && do {print "Bitte geben Sie den 1ten Wert ein:\n";
$eingabe == 2 && do {print "Bitte geben Sie den 1ten Wert ein:\n";
$eingabe == 3 && do {print "Bitte geben Sie den 1ten Wert ein:\n";
$eingabe == 4 && do {print "Bitte geben Sie den 1ten Wert ein:\n";
...
usw.
ob die Verwendung von do Blöcken hier sinnvoll ist weiß ich nicht. Sieht auf jeden Fall cool aus, ist aber in deinen Falle vermutlich ein Grund für den Fehler:
Hier kommt mal was er dann an der Fehlermeldung bring :
Sybtax error C:\3.pl line 38, near " chomp "
Sybtax error C:\3.pl line 46, near " chomp "
Sybtax error C:\3.pl line 54, near " chomp "
Sybtax error C:\3.pl line 62, near " chomp "
Missing right curly or aquare bracket at c:\3.pl line 71, at end of line Execution of C:\3.pl aborted due to compilation erros
Ich finde die Meldung eigentlich sehr aussagekräftig, leider läßt sich aber nicht immer sofort sehen, wo der Fehler ist.
In dem Skript fehlt mindestens eine schliessende Klammer
Das habe ich jetzt von einem bekommen :-(( Aber ich weiß nicht was ich da machen muss.....
guck Dir mal die Zeilen überm chomp an - da fehlt jeweils die }...
Genauer gesagt über dem jeweils 2. chomp
Aber so ist das Skript eher unübersichtlich, du solltest vielleicht doch lieber mit if ... elsif ... Strukturen arbeiten, dadurch sparst du dir ein paar Zeilen (jeweils die mit dem last WECHSEL) und hast die chance besser zu erkennen, was das Skript macht.
Struppi.