Help for this page
sub random_number { return (1..5)[rand 5]; }
sub random_number { return 1 + int rand 5; }
answer($user_answer);