免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
12
最近访问板块 发新帖
楼主: huang6894

对多个文件求平均 [复制链接]

论坛徽章:
1
程序设计版块每日发帖之星
日期:2015-10-07 06:20:00
发表于 2014-08-20 05:05 |显示全部楼层
回复 9# yestreenstars


    默认matching 任意white space来切,容易出错。
   

论坛徽章:
8
技术图书徽章
日期:2013-08-22 11:21:28未羊
日期:2015-01-19 22:22:25巳蛇
日期:2014-08-11 16:53:08子鼠
日期:2014-05-29 09:04:44摩羯座
日期:2014-04-11 14:15:07丑牛
日期:2014-01-24 12:41:28金牛座
日期:2013-11-21 17:38:28射手座
日期:2015-01-21 08:50:32
发表于 2014-08-20 08:51 |显示全部楼层
回复 2# chenhao392


    谢谢chenhao大神,我就是这么想的。。谢谢,谢谢

论坛徽章:
32
处女座
日期:2013-11-20 23:41:20双子座
日期:2014-06-11 17:20:43戌狗
日期:2014-06-16 11:05:00处女座
日期:2014-07-22 17:30:47狮子座
日期:2014-07-28 15:38:17金牛座
日期:2014-08-05 16:34:01亥猪
日期:2014-08-18 13:34:25白羊座
日期:2014-09-02 15:03:55金牛座
日期:2014-11-10 10:23:58处女座
日期:2014-12-02 09:17:52程序设计版块每日发帖之星
日期:2015-06-16 22:20:002015亚冠之塔什干火车头
日期:2015-06-20 23:28:22
发表于 2014-08-20 08:59 |显示全部楼层
回复 11# chenhao392

这跟chmop有什么关系?
   

论坛徽章:
1
程序设计版块每日发帖之星
日期:2015-10-07 06:20:00
发表于 2014-08-20 12:45 |显示全部楼层
回复 13# yestreenstars


    无关系,我也不认为chomp stupid

论坛徽章:
1
程序设计版块每日发帖之星
日期:2015-10-07 06:20:00
发表于 2014-08-20 12:59 |显示全部楼层
回复 12# huang6894


    不谢,你的这些问题其实不该局限在Perl...
    下午很想写个用shell pipe和BEDtools的,发现给你写明白要打很多字,你还要安装BEDtools,好费功夫...还是写了Perl...但事实上该是节省工作量的。
    下次提问去biostar试试, 甚至直接查答案. 自己code自己debug看看,不要老是来版上要code,感觉在杀伤不懂bioinfo的Perler的脑细胞.

     你感兴趣,查一下BEDtools 里面的groupby和mergeBED...

     囧,突然想起版大的blog里面的gb...

论坛徽章:
8
技术图书徽章
日期:2013-08-22 11:21:28未羊
日期:2015-01-19 22:22:25巳蛇
日期:2014-08-11 16:53:08子鼠
日期:2014-05-29 09:04:44摩羯座
日期:2014-04-11 14:15:07丑牛
日期:2014-01-24 12:41:28金牛座
日期:2013-11-21 17:38:28射手座
日期:2015-01-21 08:50:32
发表于 2014-08-20 14:03 |显示全部楼层
回复 15# chenhao392


    前辈,我刚刚接触这些。。。谢谢,我会去做的

论坛徽章:
5
丑牛
日期:2014-01-21 08:26:26卯兔
日期:2014-03-11 06:37:43天秤座
日期:2014-03-25 08:52:52寅虎
日期:2014-04-19 11:39:48午马
日期:2014-08-06 03:56:58
发表于 2014-08-21 13:15 |显示全部楼层
史不史丟比 ? 不只是看一行代码.

看代码不局限在一行 ~ {:2_172:}

史不史丟比 ?
  1. my $var = 123;  # 史不史丟比 ?
复制代码
but:
  1. sub foo {
  2.     my $arg = 123;  # 史丟比
  3.     $arg = shift;
复制代码
史不史丟比 ?
  1. while (<DATA>){
  2.     chomp;  # 史不史丟比 ?
复制代码
but:
  1. while (<DATA>){
  2.     chomp;
  3.     chomp;      # 史丟比
复制代码
  1. while (<DATA>){
  2.     chomp;      # 史丟比
  3.     my ( $A, $B ) = split /\s/, $_, 3;
  4.     say "$A|$B";
  5.    
  6. __DATA__
  7. a s d f g h
  8. z x c v b n
复制代码
  1. while (<DATA>){
  2.     chomp;      # 史丟比
  3.     my @a = split;
复制代码
  1. while (<DATA>){
  2.     chomp;      # 史丟比
  3.     my @a = split /,/;
  4.     print join( '|', @a ) . "\n";
  5.    
  6. __DATA__
  7. 1,2,3
复制代码
史不史丟比 ?
  1. my @context = <FILEA>;
  2. chomp @context; # 史不史丟比 ?
复制代码
but:
  1. my @context = <FILEA>;
  2. chomp @context; # 史丟比
  3. $str = $str.$context[$row]."\n";
  4. @context = ();
复制代码
....


史不史丟比 ? 不只是看一行代码 ~ {:2_168:}
回复 10# yestreenstars


   

论坛徽章:
32
处女座
日期:2013-11-20 23:41:20双子座
日期:2014-06-11 17:20:43戌狗
日期:2014-06-16 11:05:00处女座
日期:2014-07-22 17:30:47狮子座
日期:2014-07-28 15:38:17金牛座
日期:2014-08-05 16:34:01亥猪
日期:2014-08-18 13:34:25白羊座
日期:2014-09-02 15:03:55金牛座
日期:2014-11-10 10:23:58处女座
日期:2014-12-02 09:17:52程序设计版块每日发帖之星
日期:2015-06-16 22:20:002015亚冠之塔什干火车头
日期:2015-06-20 23:28:22
发表于 2014-08-21 15:47 |显示全部楼层
回复 17# pitonas

搜史丢比
   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP