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, 0U-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