Cómo leer De DOSBox en Perl

La lectura de la entrada del usuario de DOSBox en Perl se codifica de manera similar en todos los sistemas. Perl no funciona de manera diferente en diferentes sistemas, por lo que no deja de ser una cuestión de codificación de forma adecuada. Una vez que el usuario da su secuencia de comandos de datos, se puede utilizar como usted quiera. El proceso de solicitar la entrada es directa; el potencial de dificultad viene después, cuando lo que necesita para filtrar la entrada de contenido por un usuario, como una entrada de datos incorrecta podría llegar a romper la secuencia de comandos.

DOSBox es un emulador de DOS libre disponible para su descarga desde dosbox.com. Se ejecuta en una variedad de sistemas operativos.

Instrucciones

1 Abrir una instancia de DOSBox. Ahora abre el archivo perl que desea leer la entrada de DOSBox.

2 Crear una expresión que se pregunta al usuario por su aportación:

print "Por favor, danos tu entrada. \ n";
$ Entrada = <>;
imprimir "Usted anotó $ de entrada \ n";

Si usted está buscando un tipo específico de entrada, asegúrese de que usted no acepta de entrada que no califica, de lo contrario podría romper la secuencia de comandos. Puede utilizar la función de "morir" para hacer esto. Si sólo buscaba los números, se puede cambiar el ejemplo anterior para:

print "Por favor, introduzca su entrada numérica. \ n";
$ Entrada = <>;
if ($ entrada = ~ m / (\ D) + /)
{
morir "Usted ha introducido algo más que una serie de secuencias de comandos que termina \ n!";
}
más
{
imprimir "Usted anotó $ de entrada \ n";
}

El ejemplo anterior utiliza una expresión regular para examinar la entrada del usuario. Si encuentra cualquier cosa menos un número, se dará por terminada la secuencia de comandos. El usuario tendrá que ejecutar de nuevo y entrar en la entrada apropiada.

3 Guarde el archivo y salga del editor. Ahora ejecute la secuencia de comandos en DOSBox escribiendo su nombre y luego presionar "Enter". El guión le solicitan datos.