简单的Perl数学,同时保持特定的数字位数

Question

我正在尝试做一些简单的数学运算

$example = (12 - 4);

但是我需要单个数字的答案,在他们面前有一个0,所以$ example应该是

08 not 8    

我知道我可以做点什么

if ($example < 10){
    $result = "0$example";
}

但我必须认为,在进行这样的简单数学运算时,有一种方法可以指定输出的数字位数.

Answer 1

我建议保存这样的格式,直到您打印到屏幕.然后,您可以使用printf或sprintf格式化您想要的数字.

my $example = 12 - 4;
printf("%02d", $example);

将打印:

08

要将其保存在字符串中以供以后使用sprintf:

my $example = 12 - 4;
$formatted = sprintf("%02d", $example);

print "$formatted\n";

如果您需要填写小数位,请使用以下内容:

my $example = 12 - 4;
printf("%0.2f", $example);

将打印:

8.00