perl -lne'print unless$s;push@s,$_ if$s;if(/<sep>/){if($s){foreach(sort @s){print}$s=0}else{$s+=1}}'