my $padding = "0" x $diff;