perl - 如何在 Perl 中使用 sprintf 将零填充到可变长度？

Question

我想用 Perl 的 sprintf零填充一个变量。

sprintf("%08d", $var);

但我想动态确定要填零的位数。

如何替换 sprintf("%08d", $var) 中的“8”带有一个名为 $zerofill 的变量?

Answer 1

sprintf 和 printf 支持 * 表示法(这至少从 5.8 开始就有效):

printf "%0*d", 9, 12345;

000012345

printf '$%*.*f', 8, 2, 456.78;

$  456.78