Shell Programming and Scripting

P1
1,123455654444
2,7126817361873
3,2134128282828
4,4545:812987123
P2
5,123:123213123
6,98:123123123
P3
7,9123123123
8,908890909
9,99919239123
P1
1,123455654444
2,7126817361873
3,2134128282828
4,4545:812987123
P2
5,123:123213123
6,98:123123123
P3
7,9123123123
8,908890909
9,99919239123
P1
1,123455654444
2,7126817361873
3,2134128282828
4,4545:812987123
P2
5,123:123213123
6,98:123123123
P3
7,9123123123
8,908890909
9,99919239123

sed "s/P1/\\
&/" file | awk -v RS="" ' { if( $0 ~ /4,4545:/ ) { print > "newfile" } else print > "temp" } '
mv temp > file

{ rm infile && sed -n '
/P1/ b block
H
$ b block
b
:block
x
/4,4545:/w temp
/4,4545:/!p'>infile;}<infile

Temp_Pattern="with_pat.txt"
Temp_No_Pattern="no_pat.txt"
rm -f $Temp_Pattern
rm -f $Temp_No_Pattern
mFlag="1"
while read mLine
do
  if [ "$mLine" = "P1" ]; then
    if [ "$mFlag" = "Y" ]; then
      cat $$Temp >> $Temp_Pattern
    else
      if [ "$mFlag" = "N" ]; then     ### If it is not first time
        cat $$Temp >> $Temp_No_Pattern
      fi
    fi
    mFlag="N"
    rm -f $$Temp
  fi
  echo $mLine >> $$Temp
  mCnt=`echo $mLine | egrep -c '4,4545'`
  if [ $mCnt -ne 0 ]; then
    mFlag="Y"
  fi
done < input_file
if [ "$mFlag" = "Y" ]; then
 cat $$Temp >> $Temp_Pattern
fi
rm -f $$Temp