I'm so sorry, but i haven't time before thursday to write something. I have a little problem about informatic regular expression about Perl. For example, you could have some clear view of my actual brain life seeing this :


## Search about data type

          for($h=0;$h<@ligne;$h++){


               if($n=$ligne[$h]=~m/VAR/){


                      if($k=$ligne[$h]=~m/$var/){     

                               my $vars;
my @ssvar;


                              $vars=extrac_var($ligne[$h], VAR);
@ssvar=verif_var($vars);


                                if($s_var[1] ==0){
$type="unsigned char";
last;


                                 }


                                 elsif($s_var[1] ==1){


                                        $type="int";
last;

}


                                 else{


                                       print "Unclear problem about data  : $ligne[$h]\n";
exit;


                                 }
}
}


I have a little problem, it doesn't work like i want... I like informatics, and you ?

Romook, i will drink a bloody mary : after i could see clearer this kind of problem...