“全局符号需要显式包名”，即使声明了变量

Question

我正在尝试将fastq文件转换为fasta文件。这是我的代码。

#!/usr/bin/perl
use warnings;
use strict;
use vars;

my $input=$ARGV[0];
my $output=$ARGV[1];
my $qual_length = 0

，这是错误消息

syntax error at newfastq.pl line 9, near "my "
Global symbol "$seq_length" requires explicit package name at newfastq.pl line 9.
Global symbol "$seq_length" requires explicit package name at newfastq.pl line 24.
Global symbol "$seq_length" requires explicit package name at newfastq.pl line 31.
Global symbol "$seq_length" requires explicit package name at newfastq.pl line 39.

我不明白这个错误，因为我在开头声明了$ seq_length。 怎么了？ 我无法检查我的算法是否正确。

Answer 1

在声明;

之前，您错过了$seq_length