5 use DBIx::Class::Storage::DBI;
9 my $sa = new DBIC::SQL::Abstract;
11 $sa->limit_dialect('RowNum');
13 is($sa->select('rubbish',
14 [ 'foo.id', 'bar.id', \'TO_CHAR(foo.womble, "blah")' ],
18 SELECT A.*, ROWNUM r FROM
20 SELECT foo.id AS col1, bar.id AS col2, TO_CHAR(foo.womble, "blah") AS col3 FROM rubbish
25 ', 'Munged stuff to make Oracle not explode');