Can someone help me with this Perl assignment?

Create a perl script named lab12. The script must perform the following: Create an array listing six of your favorite foods. Create an array listing six foods you dislike Print out the first three items in the favorite foods array. Include some descriptive text to clarify your output. For the "disliked foods" array, move the value of the last element of the array to become the first element of the same array. Print out the first and last elements of each array to show the changes from the previous step Ask the user to add another food to the disliked foods array and then append this new item to the appropriate array Print (to the terminal) the last two element of the food array you just appended to confirm the change. 1. 2. 3. 4. S. 6. 7