my $format = $prefix . '%0' . $length . 'd';