Shell Programming and Scripting

1|2|3|4
a|b|c|d
1|2
3|4
a|
b|
c|
d|

1|2|3|4
a|b|c|d
1|23|4
a|b|c|d

BEGIN {FS="|";break_flag = 0;field_count=4}
{
#print NF
delc=gsub(/\|/,"|",$0)
print delc
if (NF == 4 )
{
print $0
}
else if (delc != 3)
{
#gsub("\"","")
gsub(/\r/,"")
printf("%s|",$0)
}
}

tr -s '\r\n' '|' < inputfile | awk '{ A=A OFS $1 ; N++ }; N>=W { print substr(A,2); A=""; N=0 } END { print substr(A,2); }' RS="|" OFS="|" W=4 -

awk     '               {gsub (/\r/, "")
                         gsub (/\|$/, "")
                         $0 = X (X?"|":"") $0
                        }
         NF < 4         {X = $0; next}
         1
                        {X = ""}
        ' FS="|" file

1|2|3|4
a|b|c|d
1|2|3|4
a|b|c|d

$ cat file
1|2|3|4
a|b|c|d
1|2
3|4
a|
b|
c|
d|

$ cat test.sh
awk '
    NF==4
    NF!=4{
           i += $NF !~ /[[:alnum:]]/? NF-1 : NF
           gsub(/\|$/,x)
           printf i < 4 ? $0 FS : $0 RS
           i = i == 4 ? 0 : i
         }
    ' FS="|" file

$ bash test.sh
1|2|3|4
a|b|c|d
1|2|3|4
a|b|c|d