Tickets verkaufen!!!!!

[Rudi]

Hi Bitte helft mir mal, was mache ich falsch?? Was muß ich ändern damit es funktioniert?????

#!/usr/bin/perl

AUSSEN: while ($nein ne 'n') {
  while ($tickets_verkauft < 10000){
   $tickets_verkauft += $verkauft;
    $vorhanden = 10000 - $tickets_verkauft;
     print "$vorhanden Tickets sind noch verfügbar. Wie viele möchten sie: ";
     $verkauft = <STDIN>;
      chomp($verkauft);
      last;
      }

while() {
  $tickets_verkauft += $verkauft;
  $vorhanden = 10000 - $tickets_verkauft;
  print "Möchten sie noch mehr?\n";
  chomp ($nochmehr = <STDIN>);
  unless ($nochmehr eq 'ja' || 'nein') {
  if($nochmehr == '*' || $nochmehr eq '*') {
       print "Ja oder nein\n";
       next;
       }
  }
         if ($nochmehr == ja || $nochmehr eq 'ja') {
          print "$vorhanden tickets sind noch verfügbar. Wie viele möchten sie: ";
          $verkauft = <STDIN>;
          chomp($verkauft);}
          next;}
        if ($nochmehr == nein || $nochmehr eq 'nein') {
       last AUSSEN;

}
     print "Die show ist ausverkauft.\n";
}
}

[Cheatah]

Hi,

was mache ich falsch??

sag Du es uns.

Was muß ich ändern damit es funktioniert?????

"Funktioniert nicht" funktioniert nicht. Fehlerbeschreibung, bitte.

Übrigens: Lies mal "Mummenschanz" von Terry Pratchett. Da kommt eine Textstelle vor, die in etwa wie folgt lautet:

"Und hast Du die Ausrufezeichen gesehen? Es sind fünf. Ein sicheres Zeichen dafür, dass jemand die Unterhose auf dem Kopf trägt."

Empfehlenswert ist diesbezüglich auch "Eric" vom gleichen Autor.

Cheatah

[Christian Kruse]

Hoi,

Übrigens: Lies mal "Mummenschanz" von Terry Pratchett. Da kommt
eine Textstelle vor, die in etwa wie folgt lautet:

"Und hast Du die Ausrufezeichen gesehen? Es sind fünf. Ein sicheres
Zeichen dafür, dass jemand die Unterhose auf dem Kopf trägt."

IMHO eine der wenigen Stellen, wo die Uebersetzung besser ist als das
Orginal ('Multiple exclamation marks are a sure sign of a deseased
mind') ;-)

Gruesse,
 CK

[Cheatah]

Hi,

"Und hast Du die Ausrufezeichen gesehen? Es sind fünf. Ein sicheres
Zeichen dafür, dass jemand die Unterhose auf dem Kopf trägt."

IMHO eine der wenigen Stellen, wo die Uebersetzung besser ist als das
Orginal ('Multiple exclamation marks are a sure sign of a deseased
mind') ;-)

dieses Zitat stammt aus <strike>Faust</strike> Eric (d: <strike>Faust</strike> Eric), nicht aus Maskerade (d: Mummenschanz) ;-) Terry hat sich halt öfter über den Sinn und Unsinn der Sprachvergewaltigung ausgelassen...

Cheatah

P.S.: Ohrkinal aus Eric: "Multiple exclamation marks", he went on, shaking his head, "are a sure sign of a diseased mind."

[Rudi]

Ach ja,

wenn die frage kommt "möchten sie noch mehr?" und man nein oder irgendwas anderes eintippt geht er nicht weiter sondern die frage kommt nochmal.

[Marcel]

/?m=63348&t=11427

[Matti Maekitalo]

use Mosche;

unless ($nochmehr eq 'ja' || 'nein') {
  if($nochmehr == '*' || $nochmehr eq '*') {

if ($nochmehr == ja || $nochmehr eq 'ja') {
        if ($nochmehr == nein || $nochmehr eq 'nein') {

Korrigiere mal diese Zeilen, in allen sind Fehler. Ohne jetzt den restlichen Code auch nur anzusehen (weil er (entschuldige) absolut (äääh) *mies* ist), vielleicht gehts dann ja.

Solltest du ein weiteres mal einen Thread zu diesem Thema aufmachen, während der alte noch in der Hauptdatei zu lesen ist, wirst du ignoriert...

use Tschoe qw(Matti);