Subject: | Module doesn't work for values greater than 3999 |
perl version is:
This is perl 5, version 18, subversion 0 (v5.18.0) built for MSWin32-x64-multi-thread
the problem is that if I use the command Roman of this Module on a numeric number greater than 3999 I get no value.
The error is on an uninitialized value because Im trying to print the result of the command.
I attach the script I use with this Module.
Subject: | Exercise12.1.1.pl |
#! C:\strawberry\perl\bin\perl.exe
use strict;
use warnings;
use Roman;
print "please enter any numeric number:";
my $numeric = <>;
chomp $numeric;
my $roman = Roman($numeric);
print "The numeric $numeric is $roman in Roman";