Le langage de programmation Perl a été conçu à l'origine pour créer des rapports . Il contient des fonctions puissantes de manipulation de fichiers texte. Par exemple, vous pouvez remplacer un caractère (comme une virgule ) ou une chaîne de caractères par une autre. La fonction "s" est utilisé pour la substitution ou de remplacement. Le texte édité est placé dans un second fichier texte et l' image originale reste inchangée. La fonction "open" ouvre les fichiers . La fonction "close" ferme les fichiers lorsque vous avez fini de les utiliser. Instructions
1
Ouvrez un fichier texte vierge dans un éditeur de texte
2
Tapez la ligne suivante pour lancer le script Perl : .
#! /usr /bin /perl
3 type de
les lignes suivantes pour ouvrir le fichier qui contient les points-virgules ( " orig_file " ) et le fichier dans lequel vous souhaitez enregistrer les modifications ( " sortie " ) :
open (FILE , " orig_file " ) or die $;
open ( OUTFILE , " sortie " ) or die $;
Remplacer " orig_file " ! et " sortie " avec les noms appropriés pour votre script.
4
Tapez les lignes suivantes pour créer la boucle while qui va lire le contenu du fichier d'origine, remplacer les virgules par des deux-points et écrire les modifications dans le fichier de sortie :
while ( )
{
$ _ = ~ s /;/:/g;
impression OUTFILE $ _ ;
}
remplacer le " : " . dans " $ _ = ~ s /;/:/g;" avec n'importe quel personnage que vous souhaitez remplacer la virgule par < br >
5
type les lignes suivantes pour fermer les fichiers ouverts :
proches ( OUTFILE );
proches (FILE) ;
6
Enregistrez le fichier sous " sub_semicolon.pl . "
7
Tapez la commande " perl sub_semicolon.pl " à l'invite pour exécuter le script de commande.