Mostrar más instrucciones
1
Generar un archivo XML vacío mediante el comando open () con las instrucciones para anexar . Este paso también imprimirá el encabezado XML y la madre node.open (XML , ">> info.xml "); impresión XML " < \\ xml version = \\ ? " 1.0 \\ " \\ > \\ n " ; impresión XML " rellenar el archivo XML. Estas pocas líneas de código de solicitar información del usuario . Después de introducir un registro, la información completa automáticamente el archivo XML a través de la "letra " command.TOP : print " Nombre: " , $ nombre = <>; chomp ($ nombre); print " Nacionalidad :"; $ nat = <>; chomp ($ nat ) ; print " Fecha de nacimiento : " $ nacimiento = <>; chomp ($ nacimiento) ; impresión XML " Programe la opción de entrada. . Después de la entrada se imprime en el archivo XML, el programa pregunta al usuario si les gustaría ingresar un nuevo registro . Si desea una respuesta afirmativa deben pulsar " n " y si quieren escapar del programa se deben presionar impresión " Para el nuevo registro de prensa \\ " n \\ " - Para salir presione \\ " e \\ \\ n "" e. " ; Impresión " : " $ nuevo = <>; chomp ($ nuevo); if ($ nuevo eq "n ") { goto top ;} if ($ eq nueva "e") {print XML " < \\ /info > " print" Nuevo archivo XML creado " exit; } print" Nuevo archivo XML creado " ; Este fragmento de código también imprime la etiqueta de cierre del nodo madre, con lo que el archivo XML lícito Guarde el código como ". gen_xml . . pl " Ejecute el programa en el símbolo del sistema de Windows Abra el símbolo del sistema y vaya al directorio donde se guarda el archivo, es decir,> cd c: . . \\ your_directory Una vez que han entrado el tipo de directorio " perl gen.xml.pl. " Introduzca la información para tres personas ficticias y luego salir del programa. prueba la validez XML. Después de ejecutar la búsqueda gen_xml.pl , buscar en la misma directorio para un archivo XML denominado " info.xml . " Abra el archivo en un navegador. Si el XML se abre en forma de árbol , entonces la generación del archivo ha sido un éxito.
2
3
4
5