Select Code to Download

# Error handling assumed.

...
    push @data, $foo;
}
$sth->finish;

# Error handling assumed.

...
    $data{$foo} = [ @stuff ];
}
$sth->finish;