Thread SQL::Abstract::Problem (1 answers)
Opened by Froschpopo at 2008-07-05 09:41

Froschpopo
 2008-07-05 16:29
#111874 #111874
User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]
Ich habe jetzt erstmal eine Notlösung gefunden:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

#!/usr/bin/perl

use strict;
use warnings;
use SQL::Abstract;

my $sql = SQL::Abstract->new;

my %where = ();

my @sql_interval = (
        'birthday', \'> DATE_SUB(CURDATE(), INTERVAL 20 YEAR)'
);

push @sql_interval, ('birthday', \'< BLABLA()');

$where{-and} = \@sql_interval;

my ($stmt, @bind) = $sql->select('defaultusers', 'birthday', \%where);

print $stmt, "\n";


Mit der Lösung schleuse ich die Funktion an den Platzhaltern vorbei. Dann muss ich die 20 (Beispielwert) halt mit DBI::quote() escapen.

View full thread SQL::Abstract::Problem