use Akar::DBI::Statement qw(sql sql_in sql_param sql_param_inout);

my $start_date = '2007-06-01';
my $statement = "SELECT id, filetype, filesource_name"
    . "\nFROM manggis.files "
    . "\nWHERE filetype IN ". sql_in( qw(durian durianloader_in durianloader_out) )
    . "\n  AND state IN ". sql_in('f', 'F')
    . "\n  AND created > to_date(". sql_param($start_date ). ", 'YYYY-MM-DD')";

my ( $text, $values_ref ) = $statement->text_and_values;