Shell Programming and Scripting

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
<iwgroups>
    <nextid value="128">
    </nextid>
    <iwgroup name="RXapproval" id="124" display-name="RXapproval" description="group for RX approval ">
        <user name="iwov">
        </user>
        <user name="m161595">
        </user>
        <user name="m594670">
        </user>
        <work name="iwov">
        </work>
    </iwgroup>
    <iwgroup name="TEXT_EMAIL" id="113" display-name="" description="TEXT email group with permission to start text pool workflow">
        <user name="iwov">
        </user>
        <user name="m123053">
        </user>
        <user name="m270857">
        </user>
        <user name="m363836">
       </user>

                 Groupname,          Description,                                                                                Users
RXapproval,        group for RX approval,                                                         iwov m161595 m594670
TEXT_EMAIL,  TEXT email group with permission to start text pool workflow,    iwov m123053 m270857 m363836

description="group for RX approval "

        group for RX approval

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
<iwgroups>
    <nextid value="128">
    </nextid>
    <iwgroup name="AEapproval" id="124" display-name="AEapproval" description="group for AE approval">
        <user name="iwov">
        </user>
        <user name="m161595">
        </user>
        <user name="m594670">
        </user>
        <user name="m803051">
        </user>
    </iwgroup>
    <iwgroup name="OES_EMAIL" id="113" display-name="" description="OES email group with permission to start oes pool workflow">
        <user name="iwov">
        </user>
        <user name="m123053">
        </user>
        <user name="m270857">
        </user>
        <user name="m363836">
        </user>
     </iwgroup>
</iwgroups>

Groupname1:AEapproval
Description: group for AE approval
Users: iwov, m161595, m594670,m803051

Groupname2:OES_EMAIL
Description: OES email group with permission to start oes pool workflow
Users: iwov,m123053,m270857,m363836

awk '
BEGIN {
	print "Groupname,Description,Users"
	OFS = ","
}
/<iwgroup / {
	groupname = description = $0
	sub(/^.* name="/, "", groupname)
	sub(/".*/, "", groupname)
	sub(/^.* description="/, "", description)
	sub(/".*/, "", description)
}
/<user / {
	gsub(/^.[^"]*"|"[^"]*$/, "")
	users = users == "" ? $0 : users " " $0
}
/<\/iwgroup>/ {
	print groupname, description, users
	users = ""
}' file

Groupname,Description,Users
AEapproval,group for AE approval,iwov m161595 m594670 m803051
OES_EMAIL,OES email group with permission to start yes pool workflow,iwov m123053 m270857 m363836

#!/usr/bin/env perl
use strict;
use warnings;

my @group = ();
my $groupnum = 0;

while(<>){
    if(/<iwgroup name/) {
        my ($name, $description) = /\bname="([^"]*).+\bdescription="([^"]*)/;
        $groupnum++;
        my $meta = "Groupname$groupnum: $name\nDescription: $description\n";
        push @group, [$meta];
        next;
    }
    if(exists $group[0]){
        if(/<user name="([^"]*)/){
            push @{$group[1]}, $1;
        }
    }
    if(/<\/iwgroup>/){
        print "\n" unless $groupnum == 1;
        print "$group[0]->[0]Users: ", join(", ", @{$group[1]}), "\n";
        @group = ();
    }
}

perl report.pl ajayakunuri.file
Groupname1: AEapproval
Description: group for AE approval
Users: iwov, m161595, m594670, m803051

Groupname2: OES_EMAIL
Description: OES email group with permission to start oes pool workflow
Users: iwov, m123053, m270857, m363836