77问答网
所有问题
当前搜索:
perl的if语句
求助:编写一段关于blast提取序列的
Perl
语言
答:
grep -n “seqs1” |less 如果想输出到某个文件 |less 改为 >youwant.txt
perl
如可查找一个数组里?
答:
查找数组中800到1200之间的数的
perl
程序如下
perl中的
defined用来判断某个变量是否为空??求解defined有什么用...
答:
defined是
perl的
函数,所以显然不应该有“$”不然就成了变量了~然后我们再说这个例子,这个例子根本不可会输出“No input available!/n”因为系统会自动把你按的回车转成识别成字符串的内容。所以这个例子应该改成 !/usr/bin/perl chomp($a = <STDIN>);
if
(defined($a)){ print "The input was ...
在
Perl中
Require 和 use 的区别
答:
use 在失败时会立即报错并挂掉, require 失败时会无声无息的略过. 所以很多情况下 require 的指令会写成 eval {require Foo::Bar}; die "$@"
if
( $@ );use 的必须是模块(package / .pm), require 就不一定是模块, 可以 require 另一个
perl
script, 使之变成 main的一部份 use 的模块...
perl
正则表达式 前后冒号什么意思?
答:
这句中的冒号是正则表达式的定界符,表示两个冒号之间是正则表达式,把冒号换成斜杠是一样的都是定界符,这句程序的意思是如果变量x中有双引号,则把变量x的内容加单引号追加到变量cmd中 如果变量x中没有双引号,则什么也不做.完整的程序如下(冒号换成斜杠是一样的,一个有双引号,一个没有双引号)...
perl
oneline的参数解释
答:
如打印出匹配上的行:
perl
-``ne '/regex/ && print' 12、perl单行命令能像perl一样灵活的使用则正表达式: perl -``ne 'print
if
/^\d+$/'使用perl来处理数据的我们,会一点
Perl
one line可以有效的减少编写重复命令的时间,尤其是那些就用1-2次就不会用的脚本,尤其在window系统...
perl
正则表达式/^\s*(.*?)\s*\=\s*\"(.*)\"/是什么意思?
答:
代码没有问题。将db.ini文件的内容逐行读出来,并进行正则匹配,将所有符合下面匹配规则的行的等号左边有效字符串(可能会为空)作为变量的名字,并将等号右边的有效字符串作为变量的值 匹配规则是,字符串必须是以至少一个空格开头,然后有或者没有除了换行符以外的任意字符串,然后再接至少一个空格,...
perl
语言,有个正则的匹配不明白,my $file = shift; $file =~ /(s...
答:
my file = shift;
if
($file =~/(s_7|s_8)/){ print file;} 这个脚本查找的是 file变量里面是否存在 s_7 或者s_8 这两个字符串。比如 将上面的代码保存为run.pl 然后再命令行输入
perl
run.pl s_7 那么最后就会在屏幕打印出s_7 如果输入 perl run.pl s_8 那么久打印s_8 而输入...
perl
下exists函数怎么用
答:
exists用于判断hash里面有没有对应的key 比如%m = (-a => 1, -b=> 10);
if
(exists $m{-a}) {print "exists a\n";} if (not exists $m{-c}) {print "not exists c\n";}
perl
如何判断一个数字是否在一个范围内
答:
my $bed=&read_bed($in_bed);open OUT1,"$out_file_pos" or die $!;open OUT2,"$out_file_bed" or die $!;open IN, "$in_file" or die $!;while (<IN>){ chomp;my @data=split /\t/, $_;my $pos=$data[2];foreach my $zone(@{$bed->{$data[0]}}){
if
($pos...
<涓婁竴椤
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜