Write a Perl program that makes a modified copy of a text file. In the copy, every string larry (case-insensitive) should be replaced with Fred and every string of Fred (case-insensitive) should be replaced with Larry. (So, ManLarry Mann should become ManFred Mann. Manfred Mann should become ManLarry Mann.) The input file name should be given on the command line (dont ask the user!), and the output filename should be the corresponding file name ending with .out.