Shell Programming and Scripting

awk '
$0 == "<bean pattern>" {
	copy = 1
	outFN = ++count "_input_ranx.xml"
	next
}
$0 == "</bean pattern>" {
	copy = 0
	close(outFN)
	next
}
copy {	print > outFN
}' input.xml

#!/bin/bash
x=0 copy=0
while IFS= read line
do
  case $line in
  "<bean pattern>")
    filename=$((++x))_output_ranx.xml
    copy=1
    echo "writing $filename ..."
    exec 3> $filename
    continue
  ;;
  "</bean pattern>")
    copy=0
  esac
  if [ $copy -eq 1 ]
  then
    echo "$line" >&3
  fi
done < input.xml

dlt=$(awk '/PATTERN-LIST/,/\/PATTERN-LIST/' xmll | grep -v "PATTERN-LIST"|wc -l)
awk '/PATTERN-LIST/,/\/PATTERN-LIST/' xmll | grep -v "PATTERN-LIST" >tmp_file.xml
#echo $dlt
vdlt=$(expr $dlt/736)
vdlt="$(( (dlt) / 736))"
for ((i=0;i<$vdlt;i++));
do
echo $i"_tmp_file.xml";
sed -n '/PATTERN/{p; :loop n; p; /\/PATTERN/q; b loop}' tmp_file.xml >$i"_tmp_file.xml";
vrm=$(sed -n '/PATTERN/{p; :loop n; p; /\/PATTERN/q; b loop}' tmp_file.xml| wc -l);
sed -i -e "1,${vrm}d" tmp_file.xml;
done