my $roman = "MCCMLXXIV"; #1874