X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FManual%2FCookbook.pod;h=fae1e9461eb25e4dbcbfeb153762f770cc8f848f;hb=336256bc90f8b0493251c4fd7d88c3cdf02f636c;hp=03db01496c045d6bf7051a774e206d102926556c;hpb=1a9251f7b99bdc102f60819eb89a8d059b86a1c5;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Manual/Cookbook.pod b/lib/DBIx/Class/Manual/Cookbook.pod index 03db014..fae1e94 100644 --- a/lib/DBIx/Class/Manual/Cookbook.pod +++ b/lib/DBIx/Class/Manual/Cookbook.pod @@ -1167,6 +1167,18 @@ Or use C while (my @vals = $cursor->next) { print $vals[0]."\n"; } + +In case you're going to use this "trick" together with L or +L a table called "dual" will be created in your +current schema. This would overlap "sys.dual" and you could not fetch "sysdate" or +"sequence.nextval" anymore from dual. To avoid this problem, just tell +L to not create table dual: + + my $sqlt_args = { + add_drop_table => 1, + parser_args => { sources => [ grep $_ ne 'Dual', schema->sources ] }, + }; + $schema->create_ddl_dir( [qw/Oracle/], undef, './sql', undef, $sqlt_args ); Or use L