1SQL::Translator::ProducUesre:r:DCioangtrraimb(u3t)ed PerSlQLD:o:cTurmaennstlaattioorn::Producer::Diagram(3)
2
3
4
6 SQL::Translator::Producer::Diagram - ER diagram producer for
7 SQL::Translator
8
10 Use via SQL::Translator:
11
12 use SQL::Translator;
13
14 my $t = SQL::Translator->new(
15 from => 'MySQL',
16 to => 'Diagram',
17 producer_args => {
18 # All args are optional
19 out_file => 'schema.png',# if not provided will return from translate()
20 output_type => 'png', # is default or 'jpeg'
21 title => 'My Schema', # default is filename
22 font_size => 'medium', # is default or 'small,' 'large'
23 imap_file => '', # filename to write image map coords
24 imap_url => '', # base URL for image map
25 gutter => 30 # is default, px distance b/w cols
26 num_columns => 5, # the number of columns
27 no_lines => 1, # do not draw lines to show FKs
28 add_color => 1, # give it some color
29 show_fk_only => 1, # show only fields used in FKs
30 join_pk_only => 1, # use only primary keys to figure PKs
31 natural_join => 1, # intuit FKs if not defined
32 skip_fields => [...], # list* of field names to exclude
33 skip_tables => [...], # list* of table names to exclude
34 skip_tables_like => [...], # list* of regexen to exclude tables
35 }
36 ) or die SQL::Translator->error;
37 $t->translate;
38
39 * "list" can be either an array-ref or a comma-separated string
40
42 Ken Youens-Clark <kclark@cpan.org>.
43
44
45
46perl v5.36.0 2023-02-S2Q7L::Translator::Producer::Diagram(3)