Select Code to Download

my %Queues;
$sql = "a valid sql statement";
...
                $Queues{TicketsAvail} = $Row[0];
            }
        }

while (my ($key,$value) = each(%Data)){
    #print "$key = $value \n";
...
        print "$k = $v \n";
    }
}