Q) Write a Perl script to declare two list(array) variables x and y of length 3 each, initialize them to using numbers, compute a list that is the sum of these lists, and print the middle three elements of the resulting list.