perl的一些小技巧
Posted bioinformations
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了perl的一些小技巧相关的知识,希望对你有一定的参考价值。
一些perl的小技巧,和大家分享一下,挺实用的。
1.用eval获取错误,避免程序崩溃,比如:
$a = 10;
$b = 0;
$c = $a/$b;
这时候会报错然后程序崩溃,可是有时候这个结果并不影响整体,我们不想程序崩溃停 止怎么办?使用eval:
$a = 10;
$b = 0;
eval {$c = $a/$b};
这个时候程序不会崩溃,只是跳出这个循环进入其他了,而错误信息也会记录在函数$@(也不知道该不该称为函数)中。
2. grep的用法
比如从1到100里选取大于50的数
my @a = grep { $_ > 50 } 1..100;
print "$_ " foreach @a;
当然你也可以用foreach实现,会很冗余,这不是perl的风格。
3.map的用法
map的结构与grep很像,比如将单词首字母大写
@myNames = ('hello', 'world', 'welcome', 'you');
@ucNames = map(ucfirst, @myNames);
foreach $key ( @ucNames ){
print "$key\n";
}
输出是:
Hello
World
Welcome
You
以上是关于perl的一些小技巧的主要内容,如果未能解决你的问题,请参考以下文章