
平臺論壇博客文庫

› 論壇 › 程序設(shè)計 › Shell › 格式轉(zhuǎn)換

[文本處理] 格式轉(zhuǎn)換 [復制鏈接]

紫風8824

白手起家

論壇徽章:: 0

電梯直達

1樓 [收藏(0)] [報告]

發(fā)表于 2015-05-11 20:22 |只看該作者 |倒序瀏覽

求教：文件1是這種格式：第一列是品種名，第一行是標記。
               a1 a2 a3 a4 a5 a6 a7
./p3-1 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-10 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-101 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-103 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-104 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-105 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-106 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-107 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-108 0/1 0/0 0/0 0/0 0/0 0/0 0/0
./p3-109 0/1 0/0 0/0 0/0 0/0 0/0 0/0

如何轉(zhuǎn)行成文件2的格式：
         a1 a2 a3 a4 a5 a6 a7
./p3-1 0 0 0 0 0 0 0
./p3-1 1 0 0 0 0 0 0
./p3-10 0 0 0 0 0 0 0
./p3-10 1 0 0 0 0 0 0
./p3-101 0 0 0 0 0 0 0
./p3-101 1 0 0 0 0 0 0
./p3-103 0 0 0 0 0 0 0
./p3-103 1 0 0 0 0 0 0
./p3-104 0 0 0 0 0 0 0
./p3-104 1 0 0 0 0 0 0
./p3-105 0 0 0 0 0 0 0
./p3-105 1 0 0 0 0 0 0
./p3-106 0 0 0 0 0 0 0
./p3-106 1 0 0 0 0 0 0
./p3-107 0 0 0 0 0 0 0
./p3-107 1 0 0 0 0 0 0
./p3-108 0 0 0 0 0 0 0
./p3-108 1 0 0 0 0 0 0
./p3-109 0 0 0 0 0 0 0
./p3-109 1 0 0 0 0 0 0
通過什么腳本轉(zhuǎn)換，謝謝指導~

格式轉(zhuǎn)換

文庫|博客

使用正則表達式與lex實現(xiàn)詞法分析器
C語言的MIPS匯編實現(xiàn)（四）SWITCH
Requested init /linuxrc failed (error -2).
比較 csv 文件中數(shù)據(jù)差異
LMD ElPack v2019.7新版亮點：Transparent mode全新升級|附下載

聆雨淋夜

家境小康

論壇徽章:: 22

程序設(shè)計版塊每日發(fā)帖之星
日期:2015-08-05 06:20:00

程序設(shè)計版塊每日發(fā)帖之星
日期:2015-08-07 06:20:00

操作系統(tǒng)版塊每日發(fā)帖之星
日期:2015-12-27 06:20:00

程序設(shè)計版塊每日發(fā)帖之星
日期:2015-06-11 22:20:00

2樓 [報告]

發(fā)表于 2015-05-11 20:43 |只看該作者

awk 'NR>1{a=gensub(/([0-9])\//,"\\1","g",$0);b=gensub(/\/([0-9])/,"\\1","g",$0);print a"\n"b}' file
./p3-1 01 00 00 00 00 00 00
./p3-1 01 00 00 00 00 00 00
./p3-10 01 00 00 00 00 00 00
./p3-10 01 00 00 00 00 00 00
./p3-101 01 00 00 00 00 00 00
./p3-101 01 00 00 00 00 00 00
./p3-103 01 00 00 00 00 00 00
./p3-103 01 00 00 00 00 00 00
./p3-104 01 00 00 00 00 00 00
./p3-104 01 00 00 00 00 00 00
./p3-105 01 00 00 00 00 00 00
./p3-105 01 00 00 00 00 00 00
./p3-106 01 00 00 00 00 00 00
./p3-106 01 00 00 00 00 00 00
./p3-107 01 00 00 00 00 00 00
./p3-107 01 00 00 00 00 00 00
./p3-108 01 00 00 00 00 00 00
./p3-108 01 00 00 00 00 00 00
./p3-109 01 00 00 00 00 00 00
./p3-109 01 00 00 00 00 00 00

復制代碼

實戰(zhàn)分享：從技術(shù)角度談機器學習入門| 【大話IT】RadonDB低門檻向MySQL集群下戰(zhàn)書 | ChinaUnix打賞功能已上線！ | 新一代分布式關(guān)系型數(shù)據(jù)庫RadonDB知多少？

liion631818

富足長樂

論壇徽章:: 10

程序設(shè)計版塊每日發(fā)帖之星
日期:2016-08-07 06:20:00

程序設(shè)計版塊每日發(fā)帖之星
日期:2016-06-12 06:20:00

程序設(shè)計版塊每日發(fā)帖之星
日期:2016-08-11 06:20:00

3樓 [報告]

發(fā)表于 2015-05-11 20:43 |只看該作者

awk 'NR>1{line1=line2=$1;for(i=2; i<=NF;i++){split($i, arr, "/");line1=line1"\t"arr[1];line2=line2"\t"arr[2]}print line1"\n"line2;next}1'

復制代碼

回復 1# 紫風8824

實戰(zhàn)分享：從技術(shù)角度談機器學習入門| 【大話IT】RadonDB低門檻向MySQL集群下戰(zhàn)書 | ChinaUnix打賞功能已上線！ | 新一代分布式關(guān)系型數(shù)據(jù)庫RadonDB知多少？

jason680

富可敵國

論壇徽章:: 145

4樓 [報告]

發(fā)表于 2015-05-11 20:57 |只看該作者

回復 1# 紫風8824

$ awk -F'[ \t]+' '$1==""{print;next}{for(n=2;n<=NF;n++){split($n,a,"/");b=b"\t"a[1];c=c"\t"a[2]};printf("%-10s%s\n%-10s%s\n",$1,b,$1,c);b=c=""}' FILE
               a1       a2       a3       a4       a5       a6       a7
./p3-1 0 0 0 0 0 0 0
./p3-1 1 0 0 0 0 0 0
./p3-10    0 0 0 0 0 0 0
./p3-10    1 0 0 0 0 0 0
./p3-101    0 0 0 0 0 0 0
./p3-101    1 0 0 0 0 0 0
./p3-103    0 0 0 0 0 0 0
./p3-103    1 0 0 0 0 0 0
./p3-104    0 0 0 0 0 0 0
./p3-104    1 0 0 0 0 0 0
./p3-105    0 0 0 0 0 0 0
./p3-105    1 0 0 0 0 0 0
./p3-106    0 0 0 0 0 0 0
./p3-106    1 0 0 0 0 0 0
./p3-107    0 0 0 0 0 0 0
./p3-107    1 0 0 0 0 0 0
./p3-108    0 0 0 0 0 0 0
./p3-108    1 0 0 0 0 0 0
./p3-109    0 0 0 0 0 0 0
./p3-109    1 0 0 0 0 0 0