Discussion :

[djidane39]

Bonsoir,

J'aimerai savoir si c'est possible de faire un foreach sur un tableau en commencant par la 2ème valeur?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
        if (ref($this->{PARAMETERS}[0]) eq "Parameter") {
		$out .= $this->{PARAMETERS}[0]->toString();
 
		foreach my $v ( @{ $this->{PARAMETERS} } ) {
			if (ref($v) eq "Parameter") {
				$out .= ", " . $v->toString();   
			} 
		}
        }

le but étant de ne pas afficher la virgule devant le premier paramètre

question 2: est-il possible de tester si le type d'une variable est un entier?

[Jedai]

1) Il serait préférable d'utiliser join() et map() :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
my $out = 
  join ', ', 
    (map {ref($_) eq 'Parameter' ? $_->toString() : () } 
      @{ $this->{PARAMETERS} });

2) Pour tester si une variable est un entier, une regex comme m{^-?\d+$} fait l'affaire.

--
Jedaï

[blacksnake]

Pour tester la nature d'une variable, tu peux faire comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print "$i is an integer\n" if ($i =~/^\d+$/);