print OUTFILE "$result{$moid}{$ext}{$kpi[$jk]}\n";
perl -i -lpe "s/^\s*$/<r><\/r>/g" $OUTFILE