perl version of base 94