Lesen Benutzereingaben von DOSBox in Perl wird in ähnlicher Weise auf jedem System codiert. Perl nicht anders funktionieren auf verschiedenen Systemen , so dass es wirklich nur eine Frage der Codierung ist es richtig . Sobald der Benutzer gibt Ihrem Skript Daten , können Sie es wie Sie wollen. Der Prozess der Bitte um Eingabe ist einfach , das Potenzial für die Schwierigkeit kommt später, wenn Sie den Inhalt durch einen Benutzer zu filtern, da eine falsche Dateneingabe möglicherweise brechen können Ihre script.DOSBox ist ein kostenloser DOS-Emulator zum Download zur Verfügung dosbox müssen . com. Es läuft auf einer Vielzahl von Betriebssystemen. Anleitung
1
Öffnen Sie eine Instanz von DOSBox . Öffnen Sie nun die Datei, die Sie Perl auf eine Eingabe von DOSBox lesen
2
Erstellen eines Ausdrucks , die der Benutzer für seinen Input fragen wird : .
Print " Bitte geben Sie Ihre Eingabe. \\ n "; $ input = <> ; print" Sie haben $ input \\ n "; !
Wenn Sie sich für eine bestimmte Art von Input suchen, machen Sie sicher, dass Sie nicht akzeptieren Eingang dass nicht qualifizieren , sonst brechen könnte Ihr Skript . Sie können das "die " Funktion, um dies zu tun. Wenn Sie nur auf der Suche nach wurden Zahlen , könnte man das obige Beispiel zu ändern:
print " Bitte geben Sie uns Ihre numerische Eingabe \\ n . "; $ Input = <> ; if ( $ input = ~ m /( \\ D) + /) {die " Sie haben etwas anderes als eine Zahl! Script beendet \\ n "; } else {print" Sie haben $ input \\ n "; ! }
Das obige Beispiel verwendet einen regulären Ausdruck , um die Eingabe des Benutzers zu prüfen. Wenn es alles andere als eine Reihe findet, wird er beendet das Skript. Der Benutzer muss , um es wieder zu laufen und geben Sie den richtigen Eingang .
3
Speichern Sie die Datei und beenden Sie den Editor . Jetzt führen Sie Ihr Skript in DOSBox indem Sie seinen Namen und dann die Taste "Enter". Das Skript wird Sie zu einer Eingabe auffordern .
