Select Code to Download

while (<DB1>) {
chomp;
...
$xml_data->{$root}{$table}{MODIFIED}{KEY}{$key}{$col}{oldvalue} = [$ol
+d];
$xml_data->{$root}{$table}{MODIFIED}{KEY}{$key}{$col}{newvalue} = [$ne
+w];
}

$xml_data->{$root}{$table}{NEW2} = [$key];

$xml_data->{$root}{$table}{NEW2}{$key} = [$key];

$xml_data->{$root}{$table}{NEW2}{$key} = [$key];

<ABC>ABC</ABC>

<KEY>ABC</KEY>