line |
true |
false |
branch |
40
|
0 |
1 |
if ($e = 'Exception::Class'->caught('DBIx::Changeset::Exception::DuplicateRecordNameException') and defined $$opt{'prompt'}) { } |
|
0 |
1 |
elsif ($e = 'Exception::Class'->caught) { } |
44
|
0 |
0 |
if ($overwrite_flag == 1) { } |
47
|
0 |
0 |
if ($@) { } |
52
|
0 |
0 |
if (my $e = 'Exception::Class'->caught) |
54
|
0 |
0 |
if defined $$opt{'debug'} |
62
|
0 |
0 |
if (my $e = 'Exception::Class'->caught) |
64
|
0 |
0 |
if defined $$opt{'debug'} |
70
|
0 |
0 |
if defined $$opt{'debug'} |
79
|
0 |
1 |
if ($$opt{'edit'}) |
81
|
0 |
0 |
if ($editor) |
86
|
0 |
1 |
if ($$opt{'vcs'}) |
87
|
0 |
0 |
if ($$opt{'vcsadd'}) { } |
125
|
1 |
2 |
unless defined $$opt{'location'} and -d $$opt{'location'} |
126
|
1 |
1 |
unless defined $$args[0] and length $$args[0] > 0 |