| line |
!l |
l&&!r |
l&&r |
condition |
|
1139
|
235 |
0 |
0 |
defined $self->use_moose && $self->use_moose |
|
|
0 |
235 |
0 |
not defined $self->use_moose && $self->use_moose and defined $self->result_roles || defined $self->result_roles_map |
|
1153
|
232 |
2 |
0 |
defined $self->result_components_map and ref $self->result_components_map ne "HASH" |
|
1169
|
234 |
0 |
0 |
defined $self->result_roles_map and ref $self->result_roles_map ne "HASH" |
|
1218
|
148 |
86 |
0 |
$self->dynamic and $self->dry_run |
|
1240
|
4 |
52 |
178 |
not ref $self->naming and defined $self->naming |
|
|
52 |
4 |
0 |
ref $self->naming eq "HASH" and exists $self->naming->{'ALL'} |
|
1262
|
230 |
4 |
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 |
2 |
0 |
@{$self->db_schema;} > 1 and not defined $self->{'qualify_objects'} |
|
1319
|
10 |
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
|
56 |
20 |
10 |
$load_classes and not defined $self->use_namespaces |
|
|
56 |
2 |
18 |
$load_classes and $self->use_namespaces |
|
|
2 |
15 |
41 |
not $load_classes and defined $self->use_namespaces |
|
|
17 |
37 |
4 |
not $load_classes and defined $self->use_namespaces and not $self->use_namespaces |
|
1518
|
26 |
10 |
13 |
$key =~ /component/ and not $c =~ s/^\+// |
|
1545
|
9452 |
0 |
30 |
-f $fullpath and &try(sub {
Cwd::abs_path($fullpath);
}
) ne (&try(sub {
Cwd::abs_path('File::Spec'->catfile($self->dump_directory, $file));
}
) || '') |
|
1595
|
610 |
0 |
158 |
$old_class and $old_class ne $class |
|
1758
|
1 |
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
|
491 |
0 |
1049 |
$source = $have_source{$moniker} and $resultset_class = $source->resultset_class |
|
|
491 |
1049 |
0 |
$source = $have_source{$moniker} and $resultset_class = $source->resultset_class and $resultset_class ne "DBIx::Class::ResultSet" |
|
2027
|
82 |
38 |
24 |
$self->result_namespace and $self->result_namespace ne "Result" |
|
2116
|
995 |
754 |
30 |
-f $filename and $self->really_erase_my_files |
|
|
1749 |
0 |
30 |
-f $filename and $self->really_erase_my_files and not $self->dry_run |
|
2125
|
752 |
1025 |
0 |
not $old_gen and -f $filename |
|
2148
|
1777 |
0 |
0 |
defined $self->use_moose and $old_gen |
|
2207
|
0 |
2 |
10 |
$text and $text =~ /\bpackage\b/ |
|
2219
|
573 |
19 |
32 |
$self->_upgrading_from and $is_schema |
|
2542
|
3184 |
1319 |
1318 |
$map and ref $map eq "HASH" |
|
|
3184 |
0 |
1319 |
$map and ref $map eq "CODE" |
|
2639
|
771 |
7 |
0 |
$is_view and my $view_def = $self->_view_definition($table) |
|
2702
|
467 |
293 |
18 |
$self->uniq_to_primary and not @$pks |
|
|
760 |
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
|
5 |
1293 |
14 |
$i == $name_idx and $v == 5 |
|
2835
|
5 |
224 |
1083 |
$i == $name_idx and $v >= 6 |
|
2972
|
1536 |
2 |
2 |
$comment && length $comment > $self->pod_comment_spillover_length |
|
2979
|
1536 |
2 |
2 |
$comment and $comment_in_name |
|
2983
|
1536 |
2 |
2 |
$comment and $comment_in_desc |
|
3079
|
1860 |
0 |
1252 |
@classes and $self->generate_pod |
| line |
l |
!l |
condition |
|
1084
|
23 |
1387 |
$self->{$_} ||= [] |
|
1209
|
0 |
234 |
$self->{'table_comments_table'} ||= "table_comments" |
|
1210
|
0 |
234 |
$self->{'column_comments_table'} ||= "column_comments" |
|
1257
|
538 |
8 |
$self->naming->{$key} || '' |
|
1260
|
182 |
52 |
$self->{'naming'} ||= {} |
|
1380
|
83 |
3 |
$self->naming->{'relationships'} ||= "v4" |
|
1381
|
83 |
3 |
$self->naming->{'monikers'} ||= "v4" |
|
1415
|
10 |
76 |
$ds || '' |
|
1434
|
2 |
2 |
$result_namespace || 'Result' |
|
1440
|
4 |
40 |
$result_namespace || 'Result' |
|
1443
|
4 |
4 |
$result_namespace || 'Result' |
|
1545
|
22 |
8 |
&try(sub {
Cwd::abs_path('File::Spec'->catfile($self->dump_directory, $file));
}
) || '' |
|
1731
|
113 |
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 |
2 |
$_->schema || '' |
|
1986
|
18 |
217 |
$self->schema_base_class || 'DBIx::Class::Schema' |
|
2048
|
4 |
231 |
$self->result_base_class || 'DBIx::Class::Core' |
|
2130
|
752 |
1025 |
$old_custom || '' |
|
2315
|
911 |
0 |
$custom ||= "" |
|
2385
|
410 |
186 |
$self->result_namespace || 'Result' |
|
2469
|
4 |
513 |
$self->result_base_class || 'DBIx::Class::Core' |
|
2579
|
938 |
2262 |
$self->naming->{'column_accessors'} || '' |
|
2683
|
778 |
0 |
$self->_table_pk_info($table) || [] |
|
2689
|
778 |
0 |
$self->_table_uniq_info($table) || [] |
|
2725
|
2201 |
0 |
$col_info->{$_} || {} |
|
2774
|
4134 |
7552 |
$self->naming->{$naming_key} || '' |
|
2841
|
314 |
769 |
$self->naming->{'monikers'} || '' |
|
|
312 |
769 |
$self->naming->{'monikers'} || '' |
|
3157
|
19 |
991 |
&$code($table_name, $column_name, $column_info) || {} |
|
3165
|
2194 |
7 |
$column_info->{'data_type'} || '' |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
1139
|
0 |
0 |
235 |
defined $self->result_roles || defined $self->result_roles_map |
|
1207
|
75 |
35 |
0 |
ref $self->{'schema'} || $self->{'schema'} |
|
|
124 |
110 |
0 |
$self->{'schema_class'} ||= ref $self->{'schema'} || $self->{'schema'} |
|
1208
|
234 |
0 |
0 |
$self->{'schema'} ||= $self->{'schema_class'} |
|
1221
|
0 |
234 |
0 |
$self->{'temp_directory'} ||= File::Temp::tempdir("dbicXXXX", "TMPDIR", 1, "CLEANUP", 1) |
|
1226
|
148 |
86 |
0 |
$self->{'dump_directory'} ||= $self->{'temp_directory'} |
|
1417
|
15 |
37 |
2 |
not defined $self->use_namespaces or $self->use_namespaces |
|
1453
|
54 |
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 |
2405 |
$self->_upgrading_from || $self->_upgrading_from_load_classes || $self->_downgrading_to_load_classes || $self->_rewriting_result_namespace |
|
1598
|
20 |
10 |
738 |
$real_inc_path or $old_real_inc_path |
|
1723
|
10 |
113 |
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 |
1 |
$different_databases or $different_schemas |
|
1989
|
80 |
111 |
44 |
$self->dynamic or $self->quiet |
|
2068
|
0 |
0 |
0 |
@{$self->left_base_classes;} or @{$self->additional_base_classes;} |
|
2084
|
8 |
8 |
217 |
$self->_downgrading_to_load_classes || $self->_rewriting_result_namespace |
|
2099
|
80 |
111 |
42 |
$self->dynamic or $self->quiet |
|
2144
|
825 |
952 |
0 |
$custom_content ||= $self->_default_custom_content($is_schema) |
|
2393
|
164 |
45 |
569 |
my $upgrading_v = $self->_upgrading_from or $self->_rewriting |
|
2509
|
2201 |
0 |
0 |
$info->{'accessor'} || $col |
|
2548
|
75 |
0 |
14 |
ref $part_map->{$part} || @parts |
|
2557
|
14 |
1 |
1303 |
$new_ident or ref $map->{$ident} |
|
2571
|
1335 |
3174 |
1312 |
$new_ident ||= $default_ident |
|
2591
|
153 |
635 |
2395 |
$v < 7 or not $self->preserve_case |
|
2793
|
0 |
5 |
5203 |
$v >= 8 || $force |
|
2822
|
5 |
0 |
1307 |
$i != $name_idx or $v >= 8 |
|
2973
|
0 |
1538 |
2 |
$pcm eq 'name' || $pcm eq 'auto' && !$comment_overflows |
|
2974
|
0 |
2 |
1538 |
$pcm eq 'description' || $pcm eq 'auto' && $comment_overflows |
|
3166
|
12 |
104 |
2085 |
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') |