Hello Einzig, and welcome to the Monastery!
You shouldn’t change the output code — that’s what you’re aiming for. Look again at the original:
print <<"END_CHARACTER"; Strength: $stat_for{strength} Intelligence: $stat_for{intelligence} Dexterity: $stat_for{dexterity} END_CHARACTER
This shows you that you need to populate (fill) the hash %stat_for with 3 values: 1 for each of the keys “strength”, “intelligence”, and “dexterity”.
Read that again. ... 3 values: 1 for each of the keys .... That’s a clue! You need a foreach loop here, to apply the code in the loop to each of the keys in the hash.
How to get the keys in the hash? Use Perl’s keys function. What to do with each key? Assign it a value found by summing two simulated rolls of the die. Note: the 3 values should be calculated independently (your current code calculates only 1 value and assigns this same value to all 3 statistics of the given character).
One more point: The output code should come outside the loop, not inside it as you have it now. That way, the output will occur only once.
Hope that helps,
| Athanasius <°(((>< contra mundum | Iustus alius egestas vitae, eros Piratica, |
In reply to Re: New to Perl: Hashes and int(rand())
by Athanasius
in thread New to Perl: Hashes and int(rand())
by Einzig
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |