Как объединить четные и нечетные строки?

Я хочу объединить каждую четную строку со строкой над ней. Что-то вроде:

Line one,csv,csv,csv
Line two,csv,csv
Line three,csv,csv,csv,csv
Line four,csv

Результат должен выглядеть так:

Line one,csv,csv,csv,Line two,csv,csv
Line three,csv,csv,csv,csv,Line four,csv

Есть идеи, как этого добиться в Perl или sed/awk?

5
задан Sinan Ünür 20 October 2011 в 20:19
поделиться