All above are still too complicated. Even a hash is not needed. What you need is just this:

#!/usr/bin/perl
my @list=(qw/zero one two three four five six seven eight nine/);
print "give the input:";
my $in=<STDIN>;
print "$list[$in]\n";
[download]

As perl can automatically transform string to integer.