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

Chinaunix

標題: 在perl中，怎樣把剛生成的輸出文件，接下來再調(diào)用呢？ [打印本頁]
作者: felix0608    時間: 2014-03-12 09:37
標題: 在perl中，怎樣把剛生成的輸出文件，接下來再調(diào)用呢？
以這個代碼為例，應(yīng)該這么做？
  1. perl -e '@lst=glob"*.fa.*";open OUT,">lst.txt";foreach(@lst){($out=$_)=~s/homo_sapiens.release-64.final.pep.//;print OUT $out,"\n";} open IN ,"lst.txt";@b=<IN>;print "@b\n"; '
復制代碼
作者: pitonas    時間: 2014-03-13 17:45
{:2_172:}
  1. my @lst = glob "*.fa.*";
  2. @lst = map { s/homo_sapiens\.release-64\.final\.pep\.//; $_ } @lst;

  4. print "@lst\n";

  6. # open OUT, ">lst.txt";
  7. # print "$_\n" for @lst;
復制代碼




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