Citação:

Originally Posted by nani123 Caro Scripting peritos, Pedido para orientar-me em passar os valores para a coluna rows

O seu exemplo não se mover colunas para linhas, que divide linhas.

Aqui está um reservatório solução.

Código:

IFS=,
set -f
while read line
do
  set -- $line
  if [ $# -le 4 ]
  then
    print "$line"
  else
   a=$1
   shift
   while [ $# -gt 3 ]
   do
     printf "%s," "$a" "$1" "$2"
     printf "%s\n" "$3"
     shift 3
   done
   printf "%s," "$a"
   while [ $# -gt 1 ]
   do
     printf "%s," "$1"
     shift
   done
   printf "%s\n" "$1"
  fi
done < "$FILE"

$ cat file
1,a,b,c,d,e,f,g,h
2,f,g,h,i,l
$ awk -F, '{
  printf$1FS;c=0
  for(i=2;i<=NF;i++)
    printf$i (++c%3?i==NF?RS:FS:RS$1FS)
}' file
1,a,b,c
1,d,e,f
1,g,h
2,f,g,h
2,i,l

Citação:

Originally Posted by pkumar3 Oi eu tenho um problema semelhante. arquivo de origem é de formato 1, a, b, c, d, e, f, g, h 2 3, F, G, H, I, L 4 5, m, n E o arquivo de saída esperados 1, a, b, c 1, D, E, F 1, g, h 3, F, G, H 3, I, L 5, m, n Eu usei esse método awk-F, '$ 1! \u003d p1 (printf "% s,% s,% s,% s \ n", $ 1, $ 2, $ 3, $ 4) $ 2! \u003d p2 (printf "% s,% s,% s ,% s \ n ", $ 1, $ 5, $ 6, $ 7, $ 8; p1 \u003d $ 1; p2 \u003d $ 2) ' o n º de coloumns no arquivo de origem é de varriable comprimento e pode crescer até 3000.

perl -F, -nae'if($#F){s/((?:(?:.*?),){3}[^,]*)/$1\n$F[0]/g;print}' filename

$ cat nani123.py 
#!/usr/bin/env python

input = open("temp.txt", 'r')

for line in input:

    line = line.rstrip()
    line = line.split(',')
    num = line[0]
    data = line[1:]

    while data:
        print num + "," + ','.join(data[:3])
        data = data[3:]

perl -F, -pae's/((?:(?:.*?),){3}[^,]*)/$1\n$F[0]/g' file