Gewusst wie: Lesen aus Dosbox in Perl

Lesen von Benutzereingaben aus DOSBox in Perl wird ebenso auf jedem System kodiert. Perl funktionieren nicht anders auf verschiedenen Systemen, so ist es wirklich nur um es richtig zu codieren. Sobald der Nutzer Ihre Skriptdaten gibt, können Sie es wie Sie wollen. Das verlangt ist einfach; das Potenzial für Schwierigkeit kommt später, wenn Sie müssen vom Benutzer eingegebenen Inhalte zu filtern, wie eine falsche Dateneingabe Ihr Skript ein ordnungsgemäßes Funktionieren kann.

DOSBox ist ein freier DOS-Emulator von dosbox.com heruntergeladen. Es läuft auf einer Vielzahl von Betriebssystemen.

Anweisungen

1 Öffnen Sie eine Instanz von DOSBox. Öffnen Sie nun die Perl-Datei, die Sie lesen Eingabe von DOSBox möchten.

2 Erstellen Sie einen Ausdruck, der den Benutzer nach seiner Eingabe fragt:

Drucken Sie, "Bitte geben Sie uns Ihre Eingabe. \n";$input = <>;Drucken "eingegebene $input! \n";

Wenn Sie suchen für eine bestimmte Art von Eingang, machen sicher akzeptieren Sie keine Eingabe, die nicht qualifiziert, ansonsten könnte sie Ihr Skript zu brechen. Die Funktion "Die" können Sie dies tun. Wenn Sie nur für Zahlen suchen, könnten Sie das obige Beispiel zu ändern:

Drucken Sie, "Bitte geben Sie uns Ihre numerische Eingabe. \n";$input = <>;Wenn ($input ~ = m/(\D)+/){sterben Sie "Sie etwas anderes als eine Zahl eingegeben! Skript zur Einstellung! \n ";}sonst{Drucken "eingegebene $input! \n";}

Das obige Beispiel verwendet einen regulären Ausdruck, um die Eingaben des Benutzers zu prüfen. Wenn sie etwas anderes als eine Reihe findet, wird es das Skript beendet. Der Benutzer muss es erneut ausführen, und geben die korrekte Eingabe.

3 Speichern Sie die Datei, und beenden Sie den Editor. Führen Sie jetzt Ihr Skript in DOSBox, indem Sie seinen Namen eingeben und drücken Sie "Enter." Das Skript werden Sie zur Eingabe aufgefordert.