Add this after your seek:

print "$.\n";
[download]

seek does not reset the line number to 0. The Range Operators use $. in this context.

Note: my $ should be my $f