Select Code to Download

    use SQL::Abstract;
    my $sa = SQL::Abstract->new;
...
    my ($query,@bind) = $sa->select('Bug', \@fieldset, {bugid=>[split(
+/,/,$args)]} );
    my $sth = $db->prepare( $query );
    eval { $sth->execute(@bind); };

sub _show_bugs(){
    my $args = shift;
...
    my $rows = $db->fetchall_arrayref($sql);  # note: is slurping in a
+ll rows
    return join '', map { sprintf $fmt, @$_ } \@headers, @$rows;
}