Select Code to Download

my $return_value = Read_INI_files_get_initialData_PP_DB();
...

print "$Section1{SQL1}\n";

#!/usr/bin/env perl
use strict;
...

print "SQL1: $SQL1\n";
print "SQL2: $SQL2\n";