#! /usr/bin/perl -w

use strict;

my @stuff = grep { /<emp>/ ... /<\/emp>/ } <DATA>;

__DATA__
<profile>
<emp>
<name>Mahesh</name>
<age>24</age>
<address>New york</address>
<desig>Developer</desig>
</emp>
</profile>
<junk>
<morejunk />
</junk>
<profile>
<emp>
<name>Mahesh2</name>
<age>242</age>
<address>New york2</address>
<desig>Developer2</desig>
</emp>
</profile>