UNIX for Dummies Questions & Answers

"prabhat,kumar",19,2000,"bangalore,India","ABC,DEF"
"prabhat,kumar",19,2000,"bangalore,India","ABC,DEF"

cat test
"prabhat,kumar",19,2000,"bangalore,India","ABC,DEF"
"prabhat,kumar",19,2000,"bangalore,India","ABC,DEF"

 awk -F"," '{for(i=1;i<=NF;i++){if(i%NF==0){ORS="\n"} {if($i ~ /^\"/ || $i ~ /\"$/) {a=a OFS $i;j++;{if(j%2==0){sub(/^\,/,X,a); print a;j=0;a=""}}} else {print $i}}} {ORS="|"}}' ORS="|" OFS=, test

"prabhat,kumar"|19|2000|"bangalore,India"|"ABC,DEF"
"prabhat,kumar"|19|2000|"bangalore,India"|"ABC,DEF"

awk -vq='"' '{c=split($0, a, q); out=X
  $0 = (a[1]) ? csv2del(1) : csv2del(2)}1
func csv2del(n) {
  for(i=n; i<=c; i++) {
    if(i%2 == 1) gsub(/,/, OFS, a[i])
    else a[i] = (q a[i] q)
    out = (out) ? out a[i] : a[i]}
  return out}' OFS='|' file

awk -vq='"' '{n = split($0, a, q); gsub(/,/, OFS, a[1]); out = a[1];
  for(i=2; i<=n; i++) {if(i%2) gsub(/,/, OFS, a[i]); out = out q a[i]}
  print out}' OFS='|' file