$padded = $string . ("0" x (10 - length $string));