grep函数的使用：
grep (/EXPR/, @array) #其中EXPR表示需要匹配内容的正则表达式，@array表示待匹配的数组，反向匹配使用grep (!/EXPR/,@array)
若使用标量接收返回结果，返回值为匹配的次...
grep函数的使用：
grep (/EXPR/, @array) #其中EXPR表示需要匹配内容的正则表达式，@array表示待匹配的数组，反向匹配使用grep (!/EXPR/,@array)
若使用标量接收返回结果，返回值为匹配的次数，使用数组接收，则返回值为匹配到的数组元素。
使用示例，使用grep函数判断数组中是否含有某个元素：
if(grep{$_ eq $gene_id}@array) {
print"Have";
}
else{
push @array,$gene_id;
print "$gene_id\n";
}
使用上述命令，我们可以将数组中等于“$gene_id”的元素不重复的打印出来。
此外，使用grep也可以进行一些简单的筛选替换工作，如：
grep $_=~s/\s//g,@array; #删除数组内部元素的空格
参考资料：
https://www.cnblogs.com/zxtang/p/14371164.html
https://zhuanlan.zhihu.com/p/583253676
