Inlezen van gebruikersinvoer van DOSBox in Perl wordt eveneens gecodeerd op elk systeem . Perl niet anders werken op verschillende systemen , dus het is echt gewoon een kwestie van codering het goed . Zodra de gebruiker het script data geeft , kunt u deze gebruiken zoals jij dat wilt . Het proces van het vragen om inbreng is eenvoudig , het potentieel voor moeilijkheid komt later wanneer u het nodig om de inhoud te filteren ingang door een gebruiker , zoals een onjuiste invoer van gegevens kan mogelijk breken uw script.DOSBox is een gratis DOS- emulator beschikbaar voor download van dosbox . com . Het draait op een verscheidenheid van besturingssystemen . Instructies
1 Open een instantie van DOSBox . Open nu de perl bestand dat u wilt invoeren lezen van DOSBox kopen van 2 Maak een uitdrukking die de gebruiker voor zijn inbreng zal vragen : . Afdruk
"geef ons uw input aub . \\ n " ; $ input = < > ; print" u heeft $ input \\ n " ; !
Als u op zoek bent naar een specifiek soort input, zorg ervoor dat u niet invoeren accepteren dat niet in aanmerking komt , anders kan je script te breken . U kunt de functie "die " te gebruiken om dit te doen . Als je alleen op zoek naar nummers , zou je het bovenstaande voorbeeld te veranderen naar : afdruk
"geef ons uw numerieke invoer aub \\ n . " ; $ Input = < > if ( $ input ~ = m /( \\ D ) + /) { sterven " Je iets anders dan een nummer ingetoetst ! Script beëindigen \\ n " ; } else { print" U heeft $ input \\ n " ; ! }
Het bovenstaande voorbeeld wordt een reguliere expressie om de input te onderzoeken van de gebruiker . Als het allesbehalve een aantal vindt , zal het script beëindigen . De gebruiker zal hebben om het opnieuw uit te voeren en voer de juiste input .
3 Sla het bestand op en sluit de editor . Lopen nu je script in DOSBox door het intikken van zijn naam en vervolgens op " Enter . " Het script zal u vragen om input.
|
