Shell Programming and Scripting

I have a file that does not have much formatting. I would like every time it finds a tag (something that starts with < and end with > like <Tag1> ) to be at the beginning of the line and joined with the next line. I tried sed with append and can not get it right and also hold and get in sed without luck.

Ex. I have a file that look something like this:

I need to send you a file today and I
need to talk to you. <Tagger1> Ok, send
me the file. <Tag2> I will if you can give
me an address. <Ttt3> I will give you
an address as soon as I can talk
to Mark in shipping. <Tagg2> Alright talk
to Mark and get back to me. <Taggg4> Ok,
will do. <Tagger4> I talk to Mark. <Tg4> What
did he say?. <Tagger3> He gave me the business
address.


It should look like this:

I need to send you a file today and I
need to talk to you.
<Tagger1> Ok, send me the file.
<Tag2> I will if you can give me an address.
<Ttt3> I will give you an address as soon as I can talk
to Mark in shipping.
<Tagg2> Alright talk to Mark and get back to me.
<Taggg4> Ok, will do.
<Tagger4> I talk to Mark.
<Tg4> What did he say?.
<Tagger3> He gave me the business address.



Any suggestion on how to search and join lines and separate tags onto it's line would be appreciated.

Code:

> cat infile | sed "s/</~</g" | tr "\n" " "  | tr "~" "\n" ; echo 
I need to send you a file today and I need to talk to you. 
<Tagger1> Ok, send me the file. 
<Tag2> I will if you can give me an address. 
<Ttt3> I will give you  an address as soon as I can talk to Mark in shipping. 
<Tagg2> Alright talk to Mark and get back to me. 
<Taggg4> Ok, will do. 
<Tagger4> I talk to Mark. 
<Tg4> What did he say?. 
<Tagger3> He gave me the business  address.

Not sure what your logic was for keeping certain lines together, while combining others. Also, my final "echo" is to force out a new-line.

Code:

cat unf.txt |tr "\n" " " | sed s/\</\\n\</g

Thanks that did it. I have spent so much time trying to get it right and your statement solved the problem. You are a genius.

Code:

 perl -ne '$_=~ s/(<.*>)/\n$1/g;print $_;' file