for my $tmpHeader(@tmpHeader) { print '[' . $tmpHeader . '] '; } #### my @allData = ('Test 1 of 1', 'bala', 'bala', ...