date hier sous forme 02 et pas 2

bonjour
pour avoir la date d'hier en perl j'utilise le code svt

Code:

---

1 2	my ($s,$mm,$h,$d,$m,$y,$wd,$yd,$isd)= localtime(time() - $secondes_par_jour); print $d;

---

alors j'au la date sous la forme 2 et pas 02
est-il possible d'avoir le zéro devant ?
d'avance merci.

En utilisant printf. Yabon printf. Une valeur sûre.

Code:

---

printf "%02d", $d;

---