Comment ouvrir un fichier et écrire une ligne dans un autre fichier en Perl

Le langage de traitement Perl vous permet d'ouvrir et d'écrire des fichiers à partir d'une page Web. Vous pouvez ouvrir un fichier en Perl et utiliser une ligne de caractères pour insérer du texte dans un autre fichier, mais vous devez créer un gestionnaire de fichier pour chaque fichier que vous ouvrez. Le gestionnaire de fichiers crée un pointeur vers le fichier, de sorte que vous pouvez éditer et ajouter du contenu au fichier en utilisant la variable du gestionnaire de fichiers.

Instructions

1 Droit-cliquez sur le fichier Perl que vous souhaitez modifier et sélectionnez "Ouvrir avec". Cliquez sur l'éditeur Perl dans la liste des programmes.

2 Ouvrez les deux fichiers. Le code suivant vous montre comment ouvrir deux fichiers en Perl:

ouvert FILE1, "> file1.txt";

ouvert FILE2, "> file2.txt";

3 Lire un article en ligne à partir du premier fichier. Vous pouvez lire un certain nombre de caractères, une ligne entière ou la totalité du fichier et affecter les résultats à une variable Perl. Le code suivant vous montre comment lire une ligne à partir du fichier:

my @ ligne1 = <FILE1>;

4 Écrivez le texte d'entrée pour le second fichier. Le code suivant vous montre comment écrire une ligne de texte pour le second fichier:

imprimer FILE2 @ ligne1;

5 Fermez les fichiers. Vous devez fermer les fichiers après la lecture complète et de l'écriture aux fichiers. Le code suivant vous montre comment fermer les deux fichiers:

fermer FILE1;

fermer FILE2;