concatenation

concatenation - Perl - Programmation

Marsh Posté le 22-07-2004 à 17:36:09    

bonjour,
je veux faire un petit script simple qui concatene ce que j'ai dans un tableau avec une autre valeur.mais le problème c'est que la deuxième valeur passe tjs à la ligne alors que je voudrais que ce soit sur la même ligne
voici ce que je fais

Code :
  1. my $l="$lignes[$j]".":63000";
  2. print $l;

Reply

Marsh Posté le 22-07-2004 à 17:36:09   

Reply

Marsh Posté le 22-07-2004 à 17:47:46    

et quand je mets des simples cotes les valeurs de "$lignes[$j]" ne sont pas remplacés.

Reply

Marsh Posté le 22-07-2004 à 17:53:52    

tes lignes viennent d'une lecture de fichier, donc elles ont un retour ligne à la fin. Pour le virer il faut utiliser 'chomp':
 
while( my $ligne = <F> ) {
  chomp $ligne;
  push @lignes, $ligne;
}
 
ou alors tu peux egalement utiliser chomp directement sur le tableau:
 
my @lignes = <F>;
chomp @lignes;
 
et vire les quotes autour de $ligne[$j], ils sont inutiles

Reply

Marsh Posté le 23-07-2004 à 09:55:43    

Bonjour,
ça ne marche pas, mais j'ai essayé ça
 

Code :
  1. my $l=$lignes[$j];
  3. my $v=chomp ($l);
  5. my $val="$v".":63000";
  6. print $val;


et ça m'affiche 1:63000 au lieu de m'afficher la valeur de mon tableau suivie de ":63000"?pourquoi?

Reply

Marsh Posté le 23-07-2004 à 10:05:10    

en faite c'est bon ça marche, j'avais fait une faute de frappe.Merci!!!

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed