4 BEGIN { require 't/example.to_sql' };
8 DwarnL to_sql(SELECT { $_->foo, "bar" });
9 DwarnL to_sql(SELECT { $_->foo, "bar" } FROM { $_->baz });
10 DwarnL to_sql(SELECT { $_->foo } FROM { $_->baz, AS('quux') });
12 SELECT { $_->cd->name } FROM { $_->cds, AS('cd') }
16 SELECT { $_->cd->name }
17 FROM { $_->cds, AS 'cd' }
18 JOIN { $_->artists, AS 'artist' }
19 ON { $_->cd->artistid eq $_->artist->id };
21 DwarnL to_sql($w_join);
23 Dwarn to_sql(FROM { $w_join } WHERE { $_->cd->year > 2000 });
26 SELECT { $_->artist->name }
27 FROM { $_->artists, AS 'artist' }
28 LEFT JOIN { $_->cds, AS 'cd' }
29 ON { $_->cd->artistid eq $_->artist->id }
32 SELECT { $_->artist->name } WHERE { $_->artist->age > 25 }
35 SELECT { $_->cd->name }
36 FROM { $_->cds, AS 'cd' }
37 JOIN { $_->artists, AS 'artist' }
38 ON { $_->cd->artistid eq $_->artist->id }
39 WHERE { $_->artist->age > 25 }
41 DwarnL to_sql(ORDER BY { $_->foo, $_->bar, $_->baz } DESC);
43 my $basic = SELECT { $_->cd->name } FROM { $_->cds, AS 'cd' };
46 FROM { $basic } WHERE { $_->year > 2000 }
50 FROM { $basic } ORDER BY { $_->year }
54 SELECT { $_->cd->name } FROM { $_->cds, AS 'cd' } ORDER BY { $_->year } DESC NULLS LAST
58 SELECT { $_->cd->name }
59 FROM { $_->cds, AS 'cd' }
61 LIMIT { 10 } OFFSET { 10 };
65 make_renderer('LimitOffset');
69 make_renderer('RowNum');
73 make_renderer('RowNumberOver');
82 SELECT { $_->cd->name, $_->artist->name }
83 FROM { $_->cds, AS 'cd' }
84 JOIN { $_->artists, AS 'artist' }
85 ON { $_->cd->artistid eq $_->artist->id }
86 WHERE { $_->artist->age > 25 }
87 ORDER BY { $_->artist->age, $_->cd->id }
88 LIMIT { 10 } OFFSET { 20 };
92 my @cols = qw(name year genre);
95 SELECT { my $cd = $_->cd; map $cd->$_, @cols }
96 FROM { $_->cds, AS 'cd' }