Problème d'alignement de chiffres

Bonjour,

j'ai le script suivant :

open(FILE,">h2o_calc.pdb") or die("Erreur d'=E9criture");

# D=E9finition de la fonction qui ajoute un atome dans le fichier .pdb
sub print_atom {
printf(FILE "ATOM %d %s %1.3f %1.3f
%1.3f"."\n",
$_[0],$_[1],$_[2],$_[3],$_[4]);
}

# Calcul de pi (petite astuce vieille comme le monde informatique)
$pi =3D 4*atan2(1, 1);

# D=E9finition des constantes
# Liaison O-H 0.0957nm =3D 0.957A (et pas 0,957)
# Angle 104.52=B0
$l_OH =3D 0.957;
$alpha =3D 104.52*$pi/180; # angle en rad

# En t=EAte du fichier .pdb
print FILE "HEADER"."\n";
print FILE "COMPND H2O calc"."\n";
print FILE "HEAD"."\n";


# Partie centrale du fichier .pdb (ex : mol=E9cule d'eau)
#&print_atom(num=E9ro_atome_dans_le_fichier_pdb, symbole_de_l_atome,
# x,
# y,
# z
# );

&print_atom(1, O, 0, 0, 0);

&print_atom(2, H, $l_OH, 0, 0);

&print_atom(3, C, $l_OH * cos($alpha), $l_OH * sin($alpha), 0);

print FILE "CONECT 1 2 3"."\n";


# Fin du fichier .pdb
print FILE "END"."\n";
print FILE "TAIL"."\n";

close(FILE);


J'ai un soucis car j'obtiens

HEADER
COMPND H2O calc
HEAD
ATOM 1 O 0.000 0.000 0.000
ATOM 2 H 0.957 0.000 0.000
ATOM 3 C -0.240 0.926 0.000
CONECT 1 2 3
END
TAIL

le signe - (de -0.240) ne devrait pas =EAtre sous le 0 de 0.957
tout devrait =EAtre d=E9cal=E9 vers la gauche...

Je ne sais pas comment faire

j'ai cherch=E9 un peu avec des mots comme "perl aligne signe moins"
mais sans grand succ=E8s.

Une id=E9e ?

Merci

PS : si vous avez des suggestions sur mon script (une syntaxe plus
Perlienne, etc...)
Merci de me le dire... je suis juste d=E9butant en Perl