Select Code to Download

my $sql = qq{
SELECT COUNT(*)
  FROM some_table
 WHERE some_column IN (} . join(',', (('?') x @values)) . ")";

my $sql = <<END_SQL;
SELECT COUNT(*)
  FROM some_table
...
    while ($sth->fetch) 
    {
     # etc.