$var1 = 1.5;
$var2 = sprintf(".0f", $var1);
What does this code tell you?
#!/usr/bin/perl
$var1 = 1.50000;
$var2 = sprintf("%.3f", $var1);for ($x; $x < 5; $x++) {
printf("%.".$x."f %.".$x."f\n", $var1, $var2);
}__END__ -Sx-
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
