You are asked to provide a list of security groups a user is a member of. You write a script to pull the data from Active Directory but are left with the following Distinguished Names (DN). Write a Perl script to remove everything except the name of the security group. There are several ways to accomplish this HINT: Use index to find the location of the comma HINT: Use substr to extract the group name HINT: You could alsso use a combination of split and substr instead Sample input CN-DL.WG.UTO. EAS, OU=Trusted Groups, DN=ASURITE, , DN=ad.asu.edu CN=DL.ORG.UTO, DN=ASURITE, DN=ad.asu.edu CN=DL.WG.Staff. Poly, DN=ASURITE, DN=ad.asu.edu CN=Domain Users, DN=ASURITE, DN=ad.asu.edu Sample invocation and output %./myScript.pl domain_groups.txt DL.WG.UTO.EAS DL.ORG.UTO DL.WG.Staff. Poly Domain Users