Perl Homework #2

1) Create one main program with no functions required (though welcome) :

a) Roll a die and print the roll. Keep going until you get two 5's in a row. (What type of repeating command will you use?) No Array needed.

• Roll a die using a random number using int (rand (6)), which gives you a number between 0 and 6 and then converts it to an integer, so 0-5 results.
• Add 1 to the result to get 1-6.
• Print the roll.
• Keep rolling until you get two 5's in a row.

b) Roll a die using a random number using int (rand (6)), which gives you a number between 0 and 6 and then converts it to an integer, so 0-5 results. Add 1 to the result to get 1-6.

• Do this 10 times to fill an array of 10 dice.
• Print the contents of the array.
• Print the total of the array.