Help for this page
if($str =~ s/XLVIII$/IL/ or $str =~ s/VIII$/IX/ or ... $str =~ s/([VXLCDM])$/$1I/) { } return $str;
if($str !~ /[IVXLCDM]+/ || $str =~ /([IXC])\1{3,}/ || ... } return 1;
www.com | www.net | www.org
No recent polls found