Perlの数値の右側にゼロを詰めて桁揃え

最初printfでできるといい思った。
つまり、次の「ゴニョゴニョ」相当の文法検索したが見つからなかった。

my $v = 999;
printf('ゴニョゴニョ', $v); # => 999000000に評価されてほしい

雑に解決

こだわってるわけではないし雑に書いて解決した。

my $v = 999;
$v .= '000000000000000';
print substr($v, 0, 9) . "\n"; # => 999000000

おｋ

最近毎日圧倒的低成長