Rechercher : dans
Par :

Perl comparaison de tableaux!!!

Dernière réponse le 25 jan 2009 à 19:44:11 1207, le 25 jan 2009 à 14:25:17 
 Signaler ce message aux modérateurs

Bonjour,
si vous savez comment faire pour comparer 2 tableaux avec while et if exclusivement...pleeeeeeeaaaaaaase, help me!!!
exemple:
$v=0;
while ($v <=$#ver) { ( 2e tableau)

if ($t[$i]==$ver[$v]) { (esk un mot du premier tableau = un mot du 2e)
$t[$i]="schtroumpfer","\n"; (si c le cas, print ...)
}
$v=$v+1;

j'ai inseré cette boucle dans la boucle de lecture du premier tableau, et ça ne donne rien, j'en ai marre!!!

Configuration: Windows Vista
Internet Explorer 7.0

Meilleures réponses pour « perl comparaison de tableaux!!! » dans :
Perl - les opérateurs VoirQu'est-ce qu'un opérateur? Les opérateurs sont des symboles qui permettent de manipuler des variables, c'est-à-dire effectuer des opérations, les évaluer, ... On distingue plusieurs types d'opérateurs : les opérateurs de calcul les...
VBScript - Les fonctions de chaînes de caractères VoirLes fonctions de chaînes de caractères Fonction Description Filter(InputStrings, Value[, Include[, Compare]]) Sélectionne des chaînes de caractères parmi un tableau de chaînes...
Les variables avec Perl VoirConcept de variable avec Perl Une variable est un objet repéré par son nom, pouvant contenir des données, qui pourront être modifiées lors de l'exécution du programme. Les variables en langage Perl peuvent être de trois...

1

lami20j, le 25 jan 2009 à 14:43:46

Salut,

lami20j@debian:~/trash$ cat ccm_comparer_tableau.pl
#!/usr/bin/perl
use strict;use warnings;

my @tab1=qw/ a b c /;
my @tab2=qw/ a d c e /;

my $x=0;
my $y=0;

while($x<=$#tab1){
        while($y<=$#tab2){
                if($tab1[$x] eq $tab2[$y]){
                        print "$tab1[$x] égal $tab2[$y]\n";
                }
                ++$y;
        }
        ++$x;
        $y=0;
}
__END__
lami20j@debian:~/trash$ perl ccm_comparer_tableau.pl
a égal a
c égal c
106485010510997108

Répondre à lami20j

2

 1207, le 25 jan 2009 à 19:44:11

Merci beaucoup c super!!!!j'espere pouvoir t'aider un jour en retour...

Répondre à 1207