Non-decimal radices/Convert: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: updated REXX program for larger bases. -- ~~~~) |
(→{{header|Perl 6}}: add entry) |
||
| Line 1,024: | Line 1,024: | ||
} while $int = int($int / $radix); |
} while $int = int($int / $radix); |
||
scalar reverse $numeral;}</lang> |
scalar reverse $numeral;}</lang> |
||
=={{header|Perl 6}}== |
|||
<lang perl6>sub from-base(Str $str, Int $base) { |
|||
val ":$base\<$str>"; |
|||
} |
|||
sub to-base(Int $int, Int $base) { |
|||
$int.base($base); |
|||
}</lang> |
|||
=={{header|PHP}}== |
=={{header|PHP}}== |
||