use Acme::Tools;

# num2code() can be used to compress numeric IDs to
# something shorter:
$chars='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz-_';
$code=num2code("241274432",5,$chars);