Select Code to Download

foreach my $sqlkey (keys %sql){
...
    }
}

   my %sqltocsv = qw(EMP_NAME NAME EMP_JOB JOB ...);

...
       }
    }