Roman::Unicode - Make roman numerals, using the Unicode characters for them
use Roman::Unicode qw( to_roman is_roman to_perl ); my $perl_number = to_perl( $roman ) if is_roman( $roman ); my $roman_number = to_roman( $arabic );
I made this module as a way to demonstrate various Unicode things without mixing up natural language stuff. Surprisingly, roman numerals can do quite a bit with that.
Returns true if the string looks like a valid roman numeral. This works with either the ASCII version or the ones using the characters in the U+2160 to U+2188 range.
If the argument is a valid roman numeral, to_perl returns the Perl number. Otherwise, it returns nothing.
to_perl
If the argument is a valid Perl number, even if it is a string, to_roman returns the roman numeral representation. This uses the characters in the U+2160 to U+2188 range.
to_roman
If the number cannot be represented as roman numerals, this returns nothing. Note that 0 doesn't have a roman numeral representation.
If you want the lowercase version, you can use lc on the result. However, some of the roman numerals don't have lowercase versions.
lc
If the argument is a valid roman numeral, it returns an ASCII representation of it. For characters that have ASCII representations, it uses those ASCII characters. For other characters, it uses ASCII art representations:
Roman ASCII art ------ ---------- ↂ (C) ↈ ((C)) ↇ (D)
These define special properties to quickly match the characters this module considers valid Roman numerals.
By using just the defined roman numerals characters in the Unicode Character Set, you're limited to numbers less than 400,000 (although you could make ↈↈↈↈ if you wanted, since that's not unheard of).
brian d foy <brian.d.foy@gmail.com> 2011-
<brian.d.foy@gmail.com>
This module started with the Roman module, credited to:
OZAWA Sakuro <ozawa at aisoft.co.jp> 1995-1997
<ozawa at aisoft.co.jp>
Alexandr Ciornii, <alexchorny at gmail.com> 2007
<alexchorny at gmail.com>
Copyright (c) 2011, brian d foy.
You can use this module under the same terms as Perl itself.
To install Roman::Unicode, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Roman::Unicode
CPAN shell
perl -MCPAN -e shell install Roman::Unicode
For more information on module installation, please visit the detailed CPAN module installation guide.