Select Code to Download

my $sql="$a where ";
...
push @where, $c if $c;

$sql .= join " and ", @where;

my $sql="$a where ";
my (@where, @args);
...
# use 'prepare_cached' instead.
my $sth = $dbh->prepare($sql);
$sth->execute(@args);