Name

Encode::Positive::Digits - Encode a positive integer using the specified digits and vice-versa

Synopsis

use Encode::Positive::Digits;

ok 4830138323689 == Encode::Positive::Digits::decode("hello world", " abcdefghlopqrw");
ok "hello world" eq Encode::Positive::Digits::encode(4830138323689, " abcdefghlopqrw");

Description

Encode::Positive::Digits::encode($number, $digits)

expresses the positive, integer,decimal number $number as a number using the digits supplied in $digits.

Encode::Positive::Digits::decode($number, $digits)

returns the decimal number corresponding to the value of number $number represented with digits $digits.

Installation

Standard Module::Build process for building and installing modules:

perl Build.PL
./Build
./Build test
./Build install

Author

philiprbrenan@gmail.com

http://www.appaapps.com

Copyright

Copyright (c) 2017 Philip R Brenan.

This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.