Have you included

use strict;
use warnings;
[download]

There is no array with @colnames, so its printing 0, You have $colnames variable which has the array reference, you need to dereference it like