RosettaCodeData/Task/Roman-numerals-Encode/Perl/roman-numerals-encode-2.pl

3 lines
54 B
Raku

use Math::Roman qw/roman/;
say roman($_) for 1..2012'