如何在perl中阅读此代码？

Question

我有一个脚本是由于某种原因而给我使用的，这是用perl编写的，我不知道如何读取perl。为了运行它，我需要对该程序进行的唯一修改是输入程序将在脚本中使用的相应文件名，但我不知道文件名应该去哪里。你能帮我吗？

我假设它位于脚本中这两个块之一的某处：

die "usage : [fasta file] \n" unless (@ARGV);

或者在这里：

sub read_fasta {
     my ($data, $file)= @_;
     open(FILE, "<",$file) or return 0;

Answer 1

当您不提供参数时脚本生成的错误消息似乎表明您应该提供文件名作为参数。

./script file.fasta

代码证实了这一点。脚本的第一个参数将移至$genome，并传递给read_fasta，将$file放入open，并将其传递给{{1}}作为要打开的文件的名称