C:\Perl_PPM\Math-Base-Convert-0.08\blib/lib/Math/Base/Convert/CalcPP.pm |
Math::Base::Convert::CalcPP
This module contains the standard methods used by Math::Base::Convert to convert from one base number to another base number.
addbaseno($reg32ptr,$int)
multiply($reg32ptr,$int)
dividebybase($reg32ptr,$int)
$longnum = 0; for $char ( $in_str =~ /./g ) { $longnum *= $base; $longnum += $value{$char) } return $number;
$output = ''; while( $longnum > 0 ) { $output = ( $longnum % $base ) . $output; $num = int( $longnum / $base ); } return $output;
Michael Robinton, michael@bizsystems.com
Copyright 2012, Michael Robinton
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
=cut
1;
C:\Perl_PPM\Math-Base-Convert-0.08\blib/lib/Math/Base/Convert/CalcPP.pm |