#!/lunar/u1/berryj/bin/gawk -f
BEGIN {FS = "&";  print list_name, " := [ " }
/./ { if (NR <= lines) printf " %f ", $field;
      if (NR < lines) print "," }
END {print "]:"}
