| line |
!l |
l&&!r |
l&&r |
condition |
|
1139
|
302 |
0 |
0 |
defined $self->use_moose && $self->use_moose |
|
|
0 |
302 |
0 |
not defined $self->use_moose && $self->use_moose and defined $self->result_roles || defined $self->result_roles_map |
|
1153
|
298 |
2 |
0 |
defined $self->result_components_map and ref $self->result_components_map ne "HASH" |
|
1169
|
300 |
0 |
0 |
defined $self->result_roles_map and ref $self->result_roles_map ne "HASH" |
|
1218
|
214 |
86 |
0 |
$self->dynamic and $self->dry_run |
|
1240
|
8 |
81 |
211 |
not ref $self->naming and defined $self->naming |
|
|
81 |
8 |
0 |
ref $self->naming eq "HASH" and exists $self->naming->{'ALL'} |
|
1262
|
294 |
6 |
0 |
$self->custom_column_info and ref $self->custom_column_info ne "CODE" |
|
1297
|
4 |
6 |
0 |
$reftype ne "HASH" and $reftype ne "CODE" |
|
1304
|
2 |
2 |
0 |
$reftype and $reftype ne "CODE" |
|
1311
|
0 |
4 |
0 |
@{$self->db_schema;} > 1 and not defined $self->{'qualify_objects'} |
|
1319
|
20 |
0 |
0 |
$self->db_schema eq "%" and not defined $self->{'qualify_objects'} |
|
1376
|
59 |
2 |
25 |
not defined $self->use_namespaces and $self->naming_set |
|
1417
|
82 |
50 |
10 |
$load_classes and not defined $self->use_namespaces |
|
|
82 |
17 |
33 |
$load_classes and $self->use_namespaces |
|
|
17 |
17 |
65 |
not $load_classes and defined $self->use_namespaces |
|
|
34 |
61 |
4 |
not $load_classes and defined $self->use_namespaces and not $self->use_namespaces |
|
1518
|
45 |
12 |
15 |
$key =~ /component/ and not $c =~ s/^\+// |
|
1545
|
8830 |
0 |
31 |
-f $fullpath and &try(sub {
Cwd::abs_path($fullpath);
}
) ne (&try(sub {
Cwd::abs_path('File::Spec'->catfile($self->dump_directory, $file));
}
) || '') |
|
1595
|
681 |
0 |
158 |
$old_class and $old_class ne $class |
|
1758
|
2 |
0 |
0 |
$imtables->[0]->can('database') && &uniq(map(($_->database || ''), @$imtables)) > 1 |
|
1784
|
0 |
0 |
0 |
$use_schema and not $have_schema |
|
1785
|
0 |
0 |
0 |
$use_database and not $have_database |
|
1889
|
564 |
0 |
1118 |
$source = $have_source{$moniker} and $resultset_class = $source->resultset_class |
|
|
564 |
1118 |
0 |
$source = $have_source{$moniker} and $resultset_class = $source->resultset_class and $resultset_class ne "DBIx::Class::ResultSet" |
|
2027
|
84 |
60 |
28 |
$self->result_namespace and $self->result_namespace ne "Result" |
|
2116
|
1103 |
850 |
33 |
-f $filename and $self->really_erase_my_files |
|
|
1953 |
0 |
33 |
-f $filename and $self->really_erase_my_files and not $self->dry_run |
|
2125
|
848 |
1136 |
0 |
not $old_gen and -f $filename |
|
2148
|
1984 |
0 |
0 |
defined $self->use_moose and $old_gen |
|
2207
|
0 |
2 |
10 |
$text and $text =~ /\bpackage\b/ |
|
2219
|
669 |
19 |
32 |
$self->_upgrading_from and $is_schema |
|
2542
|
3522 |
1319 |
1323 |
$map and ref $map eq "HASH" |
|
|
3522 |
0 |
1319 |
$map and ref $map eq "CODE" |
|
2639
|
844 |
7 |
0 |
$is_view and my $view_def = $self->_view_definition($table) |
|
2702
|
540 |
293 |
18 |
$self->uniq_to_primary and not @$pks |
|
|
833 |
12 |
6 |
$self->uniq_to_primary and not @$pks and @non_nullable_uniqs |
|
2706
|
0 |
6 |
0 |
@by_colnum > 1 and $by_colnum[0][0] == $by_colnum[1][0] |
|
2826
|
10 |
1369 |
14 |
$i == $name_idx and $v == 5 |
|
2835
|
10 |
224 |
1159 |
$i == $name_idx and $v >= 6 |
|
2972
|
1676 |
2 |
2 |
$comment && length $comment > $self->pod_comment_spillover_length |
|
2979
|
1676 |
2 |
2 |
$comment and $comment_in_name |
|
2983
|
1676 |
2 |
2 |
$comment and $comment_in_desc |
|
3079
|
2144 |
0 |
1260 |
@classes and $self->generate_pod |
| line |
l |
!l |
condition |
|
1084
|
31 |
1781 |
$self->{$_} ||= [] |
|
1209
|
0 |
300 |
$self->{'table_comments_table'} ||= "table_comments" |
|
1210
|
0 |
300 |
$self->{'column_comments_table'} ||= "column_comments" |
|
1257
|
641 |
16 |
$self->naming->{$key} || '' |
|
1260
|
219 |
81 |
$self->{'naming'} ||= {} |
|
1380
|
83 |
3 |
$self->naming->{'relationships'} ||= "v4" |
|
1381
|
83 |
3 |
$self->naming->{'monikers'} ||= "v4" |
|
1415
|
14 |
128 |
$ds || '' |
|
1434
|
2 |
2 |
$result_namespace || 'Result' |
|
1440
|
4 |
62 |
$result_namespace || 'Result' |
|
1443
|
4 |
4 |
$result_namespace || 'Result' |
|
1545
|
23 |
8 |
&try(sub {
Cwd::abs_path('File::Spec'->catfile($self->dump_directory, $file));
}
) || '' |
|
1731
|
144 |
0 |
{'v4', '::Compat::v0_040', 'v5', '::Compat::v0_05', 'v6', '::Compat::v0_06', 'v7', '::Compat::v0_07'}->{$self->naming->{'relationships'} or $CURRENT_V} || '' |
|
1761
|
0 |
4 |
$_->schema || '' |
|
1986
|
26 |
272 |
$self->schema_base_class || 'DBIx::Class::Schema' |
|
2048
|
8 |
290 |
$self->result_base_class || 'DBIx::Class::Core' |
|
2130
|
848 |
1136 |
$old_custom || '' |
|
2315
|
1067 |
0 |
$custom ||= "" |
|
2385
|
435 |
188 |
$self->result_namespace || 'Result' |
|
2469
|
8 |
582 |
$self->result_base_class || 'DBIx::Class::Core' |
|
2579
|
955 |
2429 |
$self->naming->{'column_accessors'} || '' |
|
2683
|
851 |
0 |
$self->_table_pk_info($table) || [] |
|
2689
|
851 |
0 |
$self->_table_uniq_info($table) || [] |
|
2725
|
2385 |
0 |
$col_info->{$_} || {} |
|
2774
|
4174 |
8229 |
$self->naming->{$naming_key} || '' |
|
2841
|
320 |
839 |
$self->naming->{'monikers'} || '' |
|
|
316 |
839 |
$self->naming->{'monikers'} || '' |
|
3157
|
20 |
995 |
&$code($table_name, $column_name, $column_info) || {} |
|
3165
|
2378 |
7 |
$column_info->{'data_type'} || '' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1139
|
0 |
0 |
302 |
defined $self->result_roles || defined $self->result_roles_map |
|
1207
|
108 |
35 |
0 |
ref $self->{'schema'} || $self->{'schema'} |
|
|
157 |
143 |
0 |
$self->{'schema_class'} ||= ref $self->{'schema'} || $self->{'schema'} |
|
1208
|
300 |
0 |
0 |
$self->{'schema'} ||= $self->{'schema_class'} |
|
1221
|
0 |
300 |
0 |
$self->{'temp_directory'} ||= File::Temp::tempdir("dbicXXXX", "TMPDIR", 1, "CLEANUP", 1) |
|
1226
|
214 |
86 |
0 |
$self->{'dump_directory'} ||= $self->{'temp_directory'} |
|
1417
|
17 |
61 |
17 |
not defined $self->use_namespaces or $self->use_namespaces |
|
1453
|
110 |
0 |
32 |
$v eq $CURRENT_V or $old_ver =~ /^0\.\d\d999/ |
|
1469
|
0 |
8 |
0 |
$self->naming->{'relationships'} ||= $v |
|
1470
|
0 |
8 |
0 |
$self->naming->{'monikers'} ||= $v |
|
1471
|
0 |
8 |
0 |
$self->naming->{'column_accessors'} ||= $v |
|
1560
|
121 |
82 |
2757 |
$self->_upgrading_from || $self->_upgrading_from_load_classes || $self->_downgrading_to_load_classes || $self->_rewriting_result_namespace |
|
1598
|
21 |
10 |
808 |
$real_inc_path or $old_real_inc_path |
|
1723
|
10 |
144 |
0 |
$self->{'relbuilder'} ||= do {
my $relbuilder_suff = {'v4', '::Compat::v0_040', 'v5', '::Compat::v0_05', 'v6', '::Compat::v0_06', 'v7', '::Compat::v0_07'}->{$self->naming->{'relationships'} or $CURRENT_V} || '';
my $relbuilder_class = 'DBIx::Class::Schema::Loader::RelBuilder' . $relbuilder_suff;
$self->ensure_class_loaded($relbuilder_class);
$relbuilder_class->new($self)
} |
|
1764
|
0 |
0 |
2 |
$different_databases or $different_schemas |
|
1989
|
80 |
174 |
44 |
$self->dynamic or $self->quiet |
|
2068
|
0 |
0 |
0 |
@{$self->left_base_classes;} or @{$self->additional_base_classes;} |
|
2084
|
8 |
8 |
280 |
$self->_downgrading_to_load_classes || $self->_rewriting_result_namespace |
|
2099
|
80 |
174 |
42 |
$self->dynamic or $self->quiet |
|
2144
|
921 |
1063 |
0 |
$custom_content ||= $self->_default_custom_content($is_schema) |
|
2393
|
164 |
45 |
642 |
my $upgrading_v = $self->_upgrading_from or $self->_rewriting |
|
2509
|
2385 |
0 |
0 |
$info->{'accessor'} || $col |
|
2548
|
78 |
0 |
16 |
ref $part_map->{$part} || @parts |
|
2557
|
16 |
1 |
1306 |
$new_ident or ref $map->{$ident} |
|
2571
|
1339 |
3432 |
1393 |
$new_ident ||= $default_ident |
|
2591
|
153 |
802 |
2395 |
$v < 7 or not $self->preserve_case |
|
2793
|
0 |
10 |
5521 |
$v >= 8 || $force |
|
2822
|
10 |
0 |
1383 |
$i != $name_idx or $v >= 8 |
|
2973
|
0 |
1678 |
2 |
$pcm eq 'name' || $pcm eq 'auto' && !$comment_overflows |
|
2974
|
0 |
2 |
1678 |
$pcm eq 'description' || $pcm eq 'auto' && $comment_overflows |
|
3166
|
12 |
134 |
2239 |
grep $_, @{$column_info;}{map(("inflate_$_"), ("date", "datetime", "timestamp"))} or $type =~ /date|timestamp/i |
|
3192
|
1 |
0 |
0 |
$schema->can('unregister_source') || $schema->can('_unregister_source') |