use Data::Dumper;

@results1 = 
('employee1','address1','payrate1','hiredate1',
'employee2','address2','payrate2','hiredate2');

@results2 = 
('employee3','address3','payrate3','hiredate3',
'employee4','address4','payrate4','hiredate4');

push @results1, @results2;
print Dumper \@results1;

### OUTPUT ###

$VAR1 = [
          'employee1',
          'address1',
          'payrate1',
          'hiredate1',
          'employee2',
          'address2',
          'payrate2',
          'hiredate2',
          'employee3',
          'address3',
          'payrate3',
          'hiredate3',
          'employee4',
          'address4',
          'payrate4',
          'hiredate4'
        ];
[download]

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print