die "usage: $0 <fasta>[<fasta2>.. ] 1>seq.fa 2>seq.len\n" if (@ARGV <1)

die 表孝仔弯示终止

脚本

运行，并显示出die后面的双引号里面的内容巧闷。

die "" if (@ARGV <1)则表示如果脚本运行时后面跟的参数少于1个，那么就停止运行并输出信息。从你的这句来看，意思应该是你的脚本假设为run.pl

那么运行的时候 在命令行输入的格式应该是 perl run.pl <

第一个

FA文件名><第二个FA文件名戚世>1>seq.fa 2>seq.len

其中脚本后面跟的FA文件个数应该不限制，只要跟就可以了，可以1个也可以10个20个不限制。

然后将序列和长度分别存放在 seq.fa 和seq.len两个文件里面。

其中1>表示的是普通回显信息存放。

2>一般是用来将屏显错误的信息重定向到某个文件。 这个应该是这个脚本利用了这点输出的。

所以你也不用过多纠结了，只要明白 1>seq.fa 表示把序列输出到seq.fa 文件 2>seq.len表示把序列长度输出到seq.len就可以了。

在Perl中，die函数可以用来在出现错误的时候停止解释程序的运行，并输出一条有意义的

出错消息.

$cfg是什么意思要看脚本前面的相关内容。

$应核源该是错了。

$? 包含了最近一次执行的外部程序结束状态。这些程序以办是通过管道，反小点 ('') 或system 函数执行的。

$! 包含了系统的错误。如果用在数值的地方，就是系统错误码；如果用在字符串的地方，

就是错误信息字符串。

$^E 在某些平台，返回扩展错误信息。

$@从上一个 eval 命令的 Perl 语改埋态法错误信息。$$运行当前脚本的 Perl 进程的 pid。

$< 当前进程的实际用户

标识符

(uid)。

$> 当前进程的有效用户标识符。

$( 当前进程的实际组标识符(gid)。

$) 当前进程的有效组标识符。

$0正在执行的 Perl 脚本的文件名称。

---