For clarification, the question of this being "boring" doesn't relate to a perl problem with this program, if this were written in BASIC it'd be just as "boring". It's somewhat subjective, what one person finds boring another may not. As described in Where should I post X?, Seekers of Perl Wisdom is for problems specifically relating to perl, rather than solving the problem of how make something less boring to use/play.
The fact that it the program doesn't work as intended (for example, I later posted how I died yet defeated a wolf) is a programming problem, I noticed this as I reevaluated the programs vast output based on my one decision/choice. The question OP asked was how to make the game less boring, which is outwith the scope of Perl.