From the statement
    my @labels = qw(Date,Login,Searchload,Searchsave,Searchdetails,Searchdelete);
the array  @labels contains only a single element, the string 'Date,Login,Searchload,Searchsave,Searchdetails,Searchdelete'.

>perl -wMstrict -le
"my @ra = qw(a,b,c);
 print scalar @ra;
 print qq{'@ra'};
"
Possible attempt to separate words with commas at -e line 1.
Possible attempt to separate words with commas at -e line 1.
1
'a,b,c'
[download]

The use of warnings and strictures is a very good idea.