本文目录一览

1,perl 怎么实现脚本

perl就是一个脚本语言。你说怎么实现脚本 是 用 shell脚本来执行perl吗?建一个 test.sh 内容如下:#! /bin/shperl ./XX.pl **然后用 sh test.sh 来执行。不过你可以直接 perl ./XX.pl 的!

perl 怎么实现脚本

2,perl 脚本编程问题急盼求解

use strict;open (RF,"1.txt") or die $!;while(my $line=){ chomp($line); if($line=~/:$/) #以:结尾 { my @all=split(/\/|:/,$line); print "$all[4]\n"; } if(($line=~/^start/)&&($line=~/bss$/)) #如果你第三行也要数字5160就把&&后面的去掉 { my @number=($line=~/(\d+)/g); print "$number[2]\n"; }}
本人尝试过可以读出第二行的586这个数字perl file.pl doc.txt}

perl 脚本编程问题急盼求解

3,perl脚本寻找1000bp序列

#!/usr/bin/perl -w use strict; die "perl $0 <原始FA文件> <欲存放FA文件> \n" unless(@ARGV == 2); open IN,$ARGV[0]; open OUT,">$ARGV[1]"; $/ = ">"; <IN>; $/ = "\n"; while(<IN>){ my $name = $_; chomp $name; $/ = ">"; my $seq = <IN>; chomp $seq; $/ = "\n"; $seq =~s/\n//g; next if(length($seq) <= 1000); print OUT ">$name\n$seq\n"; print "$name\tLEN:",length($seq),"\n"; } 比如我这个脚本名字保存为RunA.pl 然后我要将a.fa文件中序列长于1000bp的取出来放到b.fa中,那么我直接运行 perl RunA.pl a.fa b.fa 即可。 我测试过了可以用 如果你使用中有问题再联系我吧

perl脚本寻找1000bp序列

4,如何编写简单的Perl脚本

一般以#!/bin/sh开头(不是必须要写,但一定要单独一行),指定执行这个脚本的shell程序(也可以用#!/bin/zsh或其他),然后就是堆命令了。Linux的shell脚本支持很多功能,加上Linux高度模块化的命令,完全可以用shell脚本写出复杂的程序。以上只是简单介绍如何开始写shell脚本,如果要写复杂的脚本,还需要深入学习相关知识(如if——fi、case——esac等结构)。当然,还需要给脚本加上可执行权限(chmod +x ./file.sh),否则可以用sh ./file.sh方式执行脚本(这里的sh是执行脚本所需shell,命令也可以是zsh ./file.sh或其他)。
perl有垃圾回收机制,不过采用的是一种简单的算法——引用计数,当某变量的引用数为0时会自动释放。  至于手动释放内存,严格来讲,perl里并不存在这样的function. 不过可以“近似地”做到。  1  2  undef %hash;  undef @array;  或者:  1  2  %hash = ();  @array = ();  perl的undef()函数有两个功能: 清除变量的内容,释放变量所占的buffers, 此时你可以近似地认为已经释放了内存。  但是注意,实际上并没有真正地释放内存。如果你了解perl的变量在内存里的存放结构,你就会发现,undef后,原变量所在的内存还是被占用的,任然保持着被分配时的状态。但是这块内存的状态被的标记被“reusable”, 当所有内存皆被用完,超出阈值时,这块“被标记”的且它的“引用数为0”的内存才会被释放。

文章TAG:脚本  怎么  实现  perl脚本  怎么实现脚本  
下一篇