Perl Программирование помогите с кодом

use strict;
use warnings;

my $filename = 'chapter1.txt';
open(my $fh, $filename) or die "Не могу открыть '$filename' $!";
while (my $row = <$fh>) {
chomp $row;
my @fields = split(/:/, $row);
if($fields[7] eq "?" || $fields[7] eq NULL)
print "$row\n";
}
print $fh;
close $fh;

Не могу решить проблему с этой ошибкой
syntax error at test1.pl line 10, near ")
print"