De nouveaux fichiers XML sont générés par les programmes en tant que moyen de données de sortie du boîtier pour l'interrogation par la suite par la même ou une autre application. Pour générer un nouveau fichier XML à partir d'un programme externe, certaines spécifications doivent être respectées, comme en veillant à la structure hiérarchique adhère à des normes XML. La production et la nomination du nouveau fichier XML nécessite que le programme utilise une commande d'ouverture () avec les instructions appropriées.
Générer un fichier XML vide en utilisant la commande open () avec des instructions pour l'ajout. Cette étape sera aussi imprimer l'en-tête XML et le noeud de la mère.
ouvert (XML,"gt; gt; info.xml") -
impression XML "lt;? xml version ="1.0" Gt;? N"-
impression XML " N"-
Le fichier XML est automatiquement appelé "info.xml" Sauf indication contraire. Le 'gt; gt;' instruisent caractères que le fichier doit être utilisé pour l'ajout de données.
Remplir le fichier XML. Ces quelques lignes de code solliciter des informations de l'utilisateur. Après un enregistrement a été saisi, l'information remplit automatiquement le fichier XML à travers le "imprimer" commande.
TOP:
imprimer "Nom: "-
$ Nom = lt; gt; -
chomp ($ name) -
imprimer "Nationalité: "-
$ Nat = lt; gt; -
chomp ($ nat) -
imprimer "Date de naissance: "-
$ Naissance = lt; gt; -
chomp ($ naissance) -
impression XML " N Namelt $; / namegt; n Natlt $; / natgt; n $ Birthlt; / birthgt; nlt; / p_infogt; n"-
Le "lt; gt; -" personnages racontent le programme que l'entrée doit venir de l'utilisateur. Le chomp () - commande se débarrasse de nouveaux personnages agaçants de ligne qui rendraient le plantage du programme.
Programmer l'option d'entrée. Après l'entrée est imprimée sur le fichier XML, le programme demande à l'utilisateur si elles aimeraient entrée un nouveau record. Pour une réponse affirmative, ils doivent appuyer sur "n" et si ils veulent échapper au programme, ils doivent appuyer sur "e."
imprimer "Pour la nouvelle presse d'enregistrement "n" - Pour quitter presse "e n"-
imprimer "?: "-
$ nouvelles = lt; gt; -
chomp ($ nouveau) -
if ($ nouvelle eq "n") {
goto TOP-
}
if ($ nouvelle eq "e") {
impression XML "lt; / infogt;"-
imprimer "Nouveau fichier XML créé"-
Sortie-
}
imprimer "Nouveau fichier XML créé"-
Ce bout de code imprime aussi la balise de fermeture du noeud mère rendant ainsi le fichier XML licite. Enregistrez le code comme "gen_xml.pl".
Exécutez le programme dans l'invite de commande Windows. Ouvrez l'invite de commande et accédez au répertoire dans lequel le fichier est enregistré, c.-à- gt; cd c: votre_répertoire. Une fois que vous avez entré le type de répertoire "perl gen.xml.pl." Entrez les informations pour trois personnes fictives et puis quittez le programme.
Testez la validité XML. Après l'exécution de la recherche de gen_xml.pl, rechercher le même répertoire pour un fichier XML nommé "info.xml." Ouvrez le fichier dans un navigateur. Si le XML ouvre dans une forme d'arborescence, puis la génération du fichier a été couronnée de succès.