my @cols = qw(foo bar baz); my $sth = $dbh->prepare("SELECT " . join(', ', @cols) . " FROM bif");