La fonction Perl "diff" est utilisé pour déterminer la différence entre les deux fichiers . Vous ouvrez les fichiers et affecter le contenu d'un fichier à une chaîne. Vous pouvez ensuite exécuter la fonction "diff" sur les deux chaînes . Les deux fichiers sont évaluées, et la différence est renvoyé à une troisième variable que vous utilisez pour imprimer les résultats dans le navigateur de l'utilisateur. Instructions
1
clic droit sur le fichier Perl que vous souhaitez utiliser pour exécuter la commande diff. Cliquez sur " Ouvrir avec " et sélectionnez votre éditeur préféré Perl .
2
Ouvrez les deux fichiers que vous souhaitez comparer . Le code suivant ouvre file1.txt et file2.txt :
FILE1 ouvert, "> ", " file1.txt " ouvert FILE2 , "> ", " file2.txt "
3
assigner une chaîne pour le contenu de chacun des fichiers . Le code suivant affecte chacun des fichiers ouverts à sa propre chaîne associée :
cont1 $ = read FILE1 ; CONT2 $ = read FILE2 ;
4
comparer les deux le contenu des fichiers , et renvoyer les résultats à une troisième variable . Le code suivant remplit la fonction de comparaison :
my $ diff = String :: Diff :: diff ( cont1 $ , CONT2 $ ) ;
5
imprimer les résultats dans le navigateur de l'utilisateur . Le code suivant affiche la différence entre les deux fichiers :
print $ diff ;