Select Code to Download

# statement is prepared in advance, and values are bound right after t
+hat

...
while (my $row = $sth->fetchrow_arrayref) {
    $tk_col->insert('end', $row);
}

POE::Session->Create (
   inline_states => {
...
   args => [ $sth ],
);
POE::Kernel->run();