亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

標(biāo)題: 怎么轉(zhuǎn)義一條命令 [打印本頁(yè)]
作者: huang6894    時(shí)間: 2014-11-10 13:03
標(biāo)題: 怎么轉(zhuǎn)義一條命令
本帖最后由 huang6894 于 2014-11-10 13:04 編輯

各位大神，我想在perl中調(diào)用這兩條命令：
  1. awk -F'\t' -vOFS='\t' 'NR==FNR{a[$2]=$3">>>"$4">>>"$5;next} {{split($79,b,";");for(i in b)if(b[i] in a){sub(b[i],a[b[i]],$79)}};$0=$0";"}1' $disease_all_db  $outdir/$date".disease.part"|awk -F'\t' '{print $79}'|sort|uniq|awk -F'>>>' '$3{if(($2!=".")&&($3!=".")&&($2!~/\[[0-9].*\]/)){print $1"\t"$2"[1]\t[1]"$3}else if(($2!=".")&&($3!=".")&&($2~/\[[0-9].*\]/)){print $1"\t"$2"\t"$3}}' |sed 's/"//g'|sed 's/\[1\]\t\[1\] //g'|awk -F'\t' '{print $1">>>"$2}'|sed -r 's/\s*,\s*/]。[/g'|sed 's/\[ /\[/g'|awk -vRS='[；。、，]' '{if(sub(/\[[0-9]+\]/,"["c+1"]")){c++;printf "%s",$0RT}else{printf "%s",$0RT}}'|sed 's/。\+/。/g'|sed 's/\[[0-9]*\]。/&;/g'|sed 's/\]。;\[/,/g'|sed '/^。$/d'|sed 's/\]。\[/,/g'|sed '/^ $/d'|awk -vdisease_definition_title="$disease_definition_title" -vdisease_definition_main="$disease_definition_main" -vdisease_definition_end="$disease_definition_end" -vnewline="$disease_definition_newline" -F'>>>' '{gsub("\\$\\$",newline,$2);sub("; $","。",$2);sub(";$","。",$2);print disease_definition_title""$1""disease_definition_main""$2""disease_definition_end}' >$outdir/$date".disease.definition.report"

  3. awk -F'\t' -vOFS='\t' 'NR==FNR{a[$2]=$3">>>"$4">>>"$5;next} {{split($79,b,";");for(i in b)if(b[i] in a){sub(b[i],a[b[i]],$79)}};$0=$0";"}1' $disease_all_db  $outdir/$date".disease.part"|awk -F'\t' '{print $79}'|sort|uniq|awk -F'>>>' '$3{if(($2!=".")&&($3!=".")&&($2!~/\[[0-9].*\]/)){print $1"\t"$2"[1]\t[1]"$3}else if(($2!=".")&&($3!=".")&&($2~/\[[0-9].*\]/)){print $1"\t"$2"\t"$3}}' |sed 's/"//g'|sed 's/\[1\]\t\[1\] //g'|awk -F'\t' '{print $3}'| awk -vRS='\\[[0-9]+\\]|\n' -vcds_ref_start="$disease_ref_start" -vcds_ref_in="$disease_ref_in" -vcds_ref_end="$disease_ref_end" '/^$/{next}{printf cds_ref_start"["++c"] "$0""cds_ref_end}'  >$outdir/$date".disease_ref.report"

復(fù)制代碼
可是一直提示報(bào)錯(cuò)，我想應(yīng)該是轉(zhuǎn)義的問(wèn)題，請(qǐng)問(wèn)除了$要轉(zhuǎn)義外，我還需要做什么轉(zhuǎn)義呢？
作者: ly5066113    時(shí)間: 2014-11-10 13:03
本帖最后由 ly5066113 于 2014-11-10 13:20 編輯

回復(fù) 1# huang6894

不需要轉(zhuǎn)義。

shellcmd = q@your command@;
作者: huang6894    時(shí)間: 2014-11-10 13:54
回復(fù) 2# ly5066113


    學(xué)習(xí)了。。。謝謝
作者: yestreenstars    時(shí)間: 2014-11-10 14:14
好特么長(zhǎng)的命令�。。�！
作者: huang6894    時(shí)間: 2014-11-10 14:57
回復(fù) 4# yestreenstars


    半桶水寫的就是這么diao
作者: 刺客阿地    時(shí)間: 2014-11-12 16:05
相當(dāng)?shù)�，�?duì)于這么長(zhǎng)的，初學(xué)者，我就不看了。



歡迎光臨 Chinaunix (http://72891.cn/) Powered by Discuz! X3.2