取指定内容，求大神。

shawnloong

文本内容
<div>【题文】已知圆锥的母线长为6cm，底面圆的半径为3cm，则此圆锥侧面展开图的圆心角是（　　）<table name="optionsTable" cellpadding="0" cellspacing="0" width="100%"><tr><td width="25%">A．30°</td><td width="25%">B．60°</td><td width="25%">C．90°</td><td width="25%">D．180°</td></tr></table></div>

提取后内容
{"option" : "30°"},{"option" : "60°"},{"option" : "90°"},{"option" : "180°"}

Herowinter

回复 1# shawnloong

可以用A B C D作关键词过滤吗?
   

shawnloong

回复 2# Herowinter


    可以不过生成指定内容……

zxy877298415

1. awk -F '>|<' '{for(i=1;i<=NF;i++){if($i~/[A-Z]\．/)
   
2. {split($i,a,"．"); if(a[1]=="A")  {printf "{\042option\042 : \042"a[2]"\042}"} else {printf ",{\042option\042 : \042"a[2]"\042}" }}}print ""}' file
   
3. {"option" : "30°"},{"option" : "60°"},{"option" : "90°"},{"option" : "180°"}

复制代码

回复 1# shawnloong


   

Herowinter

回复 3# shawnloong

这样应该可以,但我不喜欢自己的代码...

1. grep -o "[ABCD]\.[^<]*" i.txt|xargs -n 4|sed 's/\w*/\"&\"/g;s/\./:/g;s/^/{/;s/$/}/;s/\s\+/},{/g'

复制代码

shawnloong

回复 5# Herowinter


    [root@OLEASM1 ~]# grep -o "[ABCD]\.[^<]*" test.log|xargs -n 4|sed 's/\w*/\"&\"/g;s/\./:/g;s/^/{/;s/$/}/;s/\s\+/},{/g'
{""}
You have new mail in /var/spool/mail/root

Herowinter

回复 6# shawnloong

我在cygwin上试的可以，可能有什么不一样，
我的linux环境不支持中文字符。
   

hjfeng1988

1. sed -r 's/.*(A.*D．180°).*/\1/;s/<[^ABCD]*[ABCD]．/"},{"option" : "/g;s/A．/{"option" : "/;s/$/"}/' file

复制代码

上面的不够严谨

1. sed -r 's/.*(A.*D[^<]*).*/\1/;s/<[^ABCD]*[ABCD]．/"},{"option" : "/g;s/A．/{"option" : "/;s/$/"}/' file

复制代码

songyc_2015

回复 1# shawnloong

1. LANG=C awk '{s=$0;while(match(s,/[A-Z]．([0-9]+°)/,a)){y=y?y",{\042option\042 : \042"a[1]"\042}":"{\042option\042 : \042"a[1]"\042}";s=substr(s,a[1,"start"]+a[1,"length"])}print y}' file
   
2. perl -lne '$rs=$rs?$rs.",{\"option\" : \"$1\"}":"{\"option\" : \"$1\"}" while(/[A-Z]．(\d+°)/g);print $rs' file

复制代码