Print csv file by headers

csv_header.sh

#!/bin/bash
# Syntax: csv_header.sh "<space delimited head names>" "<empty string replacment>"
awk -F, -v E="${2:--}" -v H="$1" -v D="^^^" '
        NR==1 {
                split(H,h," ")
                for (i=1; i<=NF; i++) {
                        f[$i] = i
                }
                for (i in h) {
                        printf "%s%s", h[i], D
                }
                print ""
        }
        NR!=1 {
                for (i in h) {
                        #print i".."h[i]".."$(f[h[i]])
                        if ( length(f[h[i]]) == 0 ) printf "%s%s", E, D
                        else printf "%s%s", $(f[h[i]]), D
                }
                print ""
        }
' | column -t -s '^^^'