Perl

Fermé
joe_gold - 26 mai 2002 à 15:56
jisisv Messages postés 3645 Date d'inscription dimanche 18 mars 2001 Statut Modérateur Dernière intervention 15 janvier 2017 - 27 mai 2002 à 10:54
bonjour j'apprend perl
j'ai un pb je dois comparer des ligne de deux fichiers et des que l'on trouve une ligne egalle j'ecris la line en sorti

open(F,'fichier.txt') ;
open(F2,'fichier2.txt);

while($ligne =<F> ) /* je fais passer les lignes une par une du ficher */
{
while($ligne2 = <F2>)
{
/** c'est ici ou j'ai le pb **/
if($ligne1 = $ligne2)
{
print ' ligne 1' ;
}
close F ;
close F2 ;

je veux donc en sorti une ligne commune aux deux fichiers.

merci
A voir également:

1 réponse

jisisv Messages postés 3645 Date d'inscription dimanche 18 mars 2001 Statut Modérateur Dernière intervention 15 janvier 2017 934
27 mai 2002 à 10:54
Ce serait-y pas

if($ligne1 == $ligne2) {
...
}

nan ?
Gates gave us the windows.
Linux gave us the whole house....
0

Discussions similaires