Maybe you have some blank lines at the end of the file. Add a check like this

while (my $line1 = <$file2>){
  next unless ($line1 =~ /\S/); # skip empty lines
  chomp $line1;
[download]