You're opening the file for writing, but trying to read from it. Therefore your @gb array gets no data when you do:

@gb = <GB>;
[download]

Try opening the file for reading (or read/write) and see if it makes a difference.

--
<http://www.dave.org.uk>

"Perl makes the fun jobs fun
and the boring jobs bearable" - me