按类别查询搜索结果
关于关键词 的检测结果,共 288
frozenlaza | 2014-11-18 17:58:51 | 阅读(0) | 评论(0)
cloc-1.51.plperl cloc-1.51.pl test.c       1 text file.       1 unique file.       0 files ignored.http://cloc.sourceforge.net v 1.51  T=0.5 s (2.0 files/s, 454.0 lines/s)----------------------------------------------------------...【阅读全文】
zhiyue5654 | 2014-11-17 11:55:47 | 阅读(390) | 评论(0)
      第五百六十九条 债权人出卖人的担保责任   (一)债权出卖人担保债务人资力时,推定为担保契约订立当时的资力。   (二)未届清偿债权的出卖人,担保债务人将来的资力时,推定为担保清偿日期的资力。      第五百七十条  出卖人的瑕疵担保责任   买卖标的物有瑕疵时,准用第五百六...【阅读全文】
snowtty | 2014-11-13 23:03:01 | 阅读(2670) | 评论(0)
安装的邮件模块E:\eml>E:\eml>ppm install   Mail::MessageDownloading ActiveState Package Repository packlist...doneUpdating ActiveState Package Repository database...doneDownloading Mail-Box-2.117...doneDownloading File-Remove-1.52...doneDownloading IO-stringy-2.110...doneDownload...【阅读全文】
zhiyue5654 | 2014-11-07 10:52:14 | 阅读(300) | 评论(0)
地役权的取得:地役权就特定主体而发生。法律行为:以设立变更终止民事权利义务关系为目的的以意思表示为基本要素的合法行为。设定地役权的行为:通常是需役地所有人或使用人与供役地所有人或使用人的双方法律行为,即地役权合同。   通行地役权:基于定目的在供役地上开设通路或利用旧路而通行的权利。&nbs...【阅读全文】
jhh130910 | 2014-10-22 15:52:44 | 阅读(1240) | 评论(0)
#!/usr/bin/perl -wprint"input your file,then press Enter!\n";my $file=<STDIN>;open FILE,"$file";open OUT,">result";  while (<FILE>){      chomp;      if(/>/){          $head=$_;      }else{$...【阅读全文】
jhh130910 | 2014-10-22 10:11:49 | 阅读(1220) | 评论(0)
#!/usr/bin/perl -wprint"input seq_1,press Enter!\n";$seq_1=<STDIN>;open ONE,"$seq_1";print"input seq_2,press Enter!\n";$seq_2=<STDIN>;open TWO,"$seq_2";   while (<ONE>){       chomp;       if (/>/){      &nbs...【阅读全文】
zhiyue5654 | 2014-10-19 18:41:27 | 阅读(600) | 评论(0)
四、银行结算账户的管理(一)银行结算账户的实名制管理1、存款人应以实名开立银行结算账户,并对其出具的开户(变更、撤销)申请资料实质内容的真实性负责,法律、行政法规另有规定的除外。自然人不可以开立基本存款账户。2、存款人应按照账户管理规定使用银行结算账户办理结算业务,涉外、涉港澳台婚姻家庭业务等,不...【阅读全文】
zhiyue5654 | 2014-10-18 18:19:28 | 阅读(560) | 评论(0)
以时日月年计算              计算方法       期间开始的时和日不计算在期间内;期间届满的最后一日是节假日的以节假日后的第一日为期间届满的日期;在途时间不包括在内诉讼文书在期满前交邮的不算过期   &...【阅读全文】
jhh130910 | 2014-09-29 15:37:39 | 阅读(660) | 评论(0)
问题说明:假设有文件夹data,里面含有很多.TXT域名的文件,而文件里有特定字符需要匹配,并输出该行。#!/usr/bin/perl -wuse strict;opendir IN,"data" || die "can't open : $!\n";open OUT,">>outfile";my @file=grep (/\.TXT/,readdir IN);foreach my $list(@file){    open TWO,"data/$list" o...【阅读全文】
jhh130910 | 2014-09-28 15:51:04 | 阅读(900) | 评论(0)
#!/usr/bin/perl -w$|=1;print "input your genome sequence,then press Enter!\n";my $seq=<STDIN>;open FASTA,"$seq" or die "can not open FASTA file,$!";print "input your gff file name,then press Enter!\n";my $gff=<STDIN>;open GFF,"$gff" or die "can not open GFF file,$!";open OUT,">gene_sequence"...【阅读全文】
【PERL】 GFF3息提取
jhh130910 | 2014-09-28 15:45:58 | 阅读(2390) | 评论(0)
文件说明:数据如下,我想提取第三列含gene的行的特定##gff-version 3Chr1    phytozome9_0    gene    3631    5899    .    +    .    ID=AT1G01010;Name=AT1G01010Chr1    ...【阅读全文】
jhh130910 | 2014-09-27 21:42:21 | 阅读(1030) | 评论(0)
问题描述:比如我的数据(如下),我现在想提取表头里第二列数字小于99的序列,以下perl代码可以完成这个工作。>example 100 other tail  1   NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN >example 99 other tail  2   NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN...【阅读全文】
linux_arm | 2014-09-21 18:10:59 | 阅读(850) | 评论(0)
很早的一篇文章了,放到这里纪念下 :-)文章作者:东方 [E.S.T](穆东栋)信息来源:邪恶八进制信息安全团队(www.eviloctal.com)#!/bin/perl#名称:基于RSA算法的文件签名程序#作者:穆东栋 [E.S.T]#版本:1.0(演示版)###################################################################说明:E.txt D.tx...【阅读全文】
我还是小小明 | 2014-09-18 10:36:23 | 阅读(1880) | 评论(0)
use strict;my @list;$list[0][0]="s";$list[0][1]="3";$list[1][0]="d";$list[1][1]="4";$list[2][0]="w";$list[2][1]="2";$list[3][0]="h";$list[3][1]="0";$list[4][0]="j";$list[4][1]="9";@list = sort{$a->[1] <=> $b->[1]} @list;for(@list){    print $_,' ' for @{$_};  &nb...【阅读全文】
我还是小小明 | 2014-09-17 21:30:23 | 阅读(1730) | 评论(0)
my @AOA=([1,2,3],[4,5,6],[7,8,9]);my @tmp=map{$AOA[$_][0]} (0..$#AOA);print join("\n",@tmp),"\n";【阅读全文】
小公猫 | 2014-09-17 15:09:34 | 阅读(1020) | 评论(0)
Perl中使用一种叫做文件句柄类型的变量来操作文件;Perl使用文件句柄在程序与外部存储器中的文件之间建立了一个可以与外部存储介质交换数据的IO通道;建议文件句柄全部使用大写字母表示,以区别于普通的变量;Perl提供了三个内置的、比较特殊的文件句柄变量:STDIN、STDOUT和STDERR,分别代表标准输入、标准输出和标准出错输出;【阅读全文】
huaius | 2014-09-13 21:08:00 | 阅读(7210) | 评论(0)
our,my和local都是用来声明或者定义变量的关键字,他们之间的关系一度令我感到迷惑,现在就一步步的阐述三者之间的区别。一个简单的总结性描述如下:our: 定义或者声明一个全局变量,在当前的包环境下。my: 定义一个新的、局部范围(块或者文件)有效的变量。local: 重新定义局部范围有效的变量...【阅读全文】
【PERL】 cpanm使
fzhye | 2014-09-12 15:58:47 | 阅读(1830) | 评论(0)
总是忘记模块地址,还是记下为好。1. 安装cpanmcpanm其实是一个可执行文件而已。将它下载到bin目录,然后添加执行权限就可以了。# wget http://xrl.us/cpanm -O /usr/bin/cpanm; chmod +x /usr/bin/cpanm2. 使用cpanm安装模块...【阅读全文】
zhiyue5654 | 2014-09-10 19:38:48 | 阅读(640) | 评论(0)
17.内幕信息:是在证券交易活动中,13.对外担保:是指我国境内的中国法人以保证、抵押和质押方式对境外机构或境内的外资机构承诺。 由专业机构汇集起来并投资于股票或债券等有价证券,非股权债权关系;②资金投向:股票或债券等有价证券,本条第二款是对多次贪污未经处理的如何计算贪污数额的规定。对伙同者,债务人将合...【阅读全文】
zhiyue5654 | 2014-08-26 19:26:27 | 阅读(460) | 评论(0)
   之所以允许劳动合同就劳动者保守商业秘密事项和服务期事项约定违约金,是因为用人单位就这两项事项事先有投入,例如,用人单位因出资培训而与劳动者签订服务期条款,劳动合同就此对劳动者的辞职约定违约金,不是为了惩罚劳动者或担保合同的履行,而是补偿因劳动者辞职给企业造成的损失。这样的违约金的约定具有...【阅读全文】