Select Code to Download

$src ='<?xml version="1.0" encoding="UTF-8"?><record name="rightnav" t
+ype="content"><item name="RHS_Image"><value>/me/accounts/include/imag
+es/accounts_RHS.jpg</value>
</item>
    <item name="RHS_Navigation">';

$new_tag ='<item name="abcd"><value>';

if($strFile =~ /<record (.*)>/igm){
  $strFile =~ s/$&/$&$new_tag/i;
}