<div dir="ltr"><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)">Hi All,</div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)">

<br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)">We are having one small XML file which has below format</div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)">

<br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)"><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

<IDs><br><<strong>child1</strong>><br> <Group>group1</Group><br> <Code>code1</Code><br> <Division>division1</Division><br> <Department></Department><br> <Class>1512</PSA><br>

</<strong>child1</strong>><br><<strong>child2</strong>><br> <Group>Group2</Group><br> <Code>Code2</Code><br> <Division></Division><br> <Department></Department><br>

 <Class>1010, 1015, 1020</PSA><br></<strong>child2</strong>></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">---</div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

---</div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">---<br></IDs></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

<br></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px"><br></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

I need to write a perl script to capture the values into variables </div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px"><br></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

I got confused how to handle different childs in Perl .. Child1..Child2</div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px"><br></div><div style="color:rgb(34,34,34);font-family:'times new roman','new york',times,serif;font-size:13px">

Any sample perl script will be helpful to me</div></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)"><br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif;color:rgb(0,0,102)">

<br></div><div><div style="text-transform:none;text-indent:0px;font-style:normal;font-variant:normal;font-weight:normal;font-size:small;line-height:normal;font-family:arial;white-space:normal;letter-spacing:normal;color:rgb(0,0,0);word-spacing:0px">

<font color="#003366" face="Calibri"><font color="#666666" face="'comic sans ms', sans-serif">-------------------------------------------</font></font></div>
<div style="text-transform:none;text-indent:0px;font-style:normal;font-variant:normal;font-weight:normal;font-size:small;line-height:normal;font-family:arial;white-space:normal;letter-spacing:normal;color:rgb(0,0,0);word-spacing:0px">

<font color="#003366" face="Calibri"><font color="#666666" face="'comic sans ms', sans-serif">
<p style="margin:0in 0in 0pt"><span style="color:rgb(23,54,93)"><font face="Calibri">Regards, </font></span><span style="font-family:Wingdings;color:rgb(23,54,93)">J</span><span style="color:rgb(23,54,93)"></span></p></font></font><font style="line-height:normal;text-transform:none;font-variant:normal;font-style:normal;text-indent:0px;white-space:normal;letter-spacing:normal;font-size:small;font-weight:normal;word-spacing:0px" color="#003366" face="Calibri"><strong><font color="#333333" size="4" face="tahoma, sans-serif">$@tya..</font></strong></font></div>


<div> </div></div>
</div>