Thread DBIx::Class (3 answers)
Opened by Froschpopo at 2007-11-30 17:57

Froschpopo
 2007-11-30 21:43
#103334 #103334
User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]
verstehe.
Aber was ist, wenn die Tabellen, Spalten und WHERE-Klausel im Script bestimmt wird?
Das ist nämlich das tolle an SQL::Abstract:

Ich habe hier mal ein Beispiel gemacht, wie ich gerne arbeiten möchte und was ich gern mit DBIx::Class umsetzen möchte:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

#!/usr/bin/perl

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

my $cgi = new CGI;

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

my @tables = ('users');

my %where = ('users.geschlecht' => 'w');

if ($cgi->param('nur_user_mit_bild')) {
        push @tables, 'fotos';
        $where{'fotos.user_id'} = \'= users.id';
}

my ($sth, @bind) = $sql->select(\@tables, 'users.id', \%where);


print $sth,"\n"; 
#SELECT users.id FROM users WHERE ( users.geschlecht = ? )


Ich möchte die ganzen Parameter gerne im Script zusammenstellen können.
Ich verstehe dazu auch diese ganze Sache mit dem __PACKAGE__ nicht.
Warum schreibst du das einfach so dort hinein? Warum machst du kein Objekt?

View full thread DBIx::Class