Discussion :

[Sethenssen]

Bonjour,

Il y a un truc qui est à mon avis super simple mais que je n'arrive à faire.
Sur une boucle for avec $i allant de 1 à 12,
Je veux que si $i est inférieur à 10 qu'il m'affiche

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
01
02
03
04
05
06
07
08
09
10
11
12

Au lieu de:

Code :

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

1
2
3
4
1
2
3
...

Dans mon script ci-dessous je bouge la boucle if et le for dans tous les sens mais ça ne fonctionne pas. Je me gratte la tête

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
#!/usr/bin/perl -w
use strict;
use warnings;
 
my $i=1;
 
for ($i=1; $i < 13; $i++)	{
	if ($i < 10) {
		$i = "0" . $i;
	}
	print $i."\n";
}

[djibril]

Code :

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

1
2
3
4
5
6
7
8
9
#!/usr/bin/perl
use strict;
use warnings;
 
my $compteur = 0;
for ( 1..20 ) {
  $compteur = sprintf '%.2d', $_;
  print $compteur,"\n";
}

[Sethenssen]

Merci, compris.
Je vais bosser sur les différences entre print, printf et sprintf.

J'ai adapté ce que tu m'as donné et cela fonctionne.