Select Code to Download

while (my $data = $sth->fetchrow_hashref()) {
    # %$data is now a hash.
...
        # for all the canning-values etc.pp.
    }
}