in reply to sprintf to zero-pad on the right

$string = reverse sprintf "%08s", scalar reverse $string;

In Section Seekers of Perl Wisdom