Search Results

try:
awk '
/^ *$/{gsub("[-]","",l);gsub(" *[|] *","|",l);sub("^[|]*","",l);print l; l="";}
/, *.. [0-9][0-9]*$/ {sub(",","|"); $NF="|"$NF}
/^ *[0-9 -][0-9 -]* *$/ {gsub("[ -]","")}
{l=l $0 "|";}...

also try:
awk '
/^ *$/{gsub("[-]","",l);gsub(" *[|] *","|",l);sub("^[|]*","",l);print l; l="";}
/, *.. [0-9][0-9]*$/ {sub(",","|"); $NF="|"$NF}
{l=l $0 "|";}
' infile

nice attempt at being subliminal...

nawk '$1=$1' RS='' OFS='|' myFile