| line |
true |
false |
branch |
|
30
|
0 |
28 |
if (ref $_[0] and eval {
do {
$_[0]->isa('Test::Mojo')
}
}) { }
|
|
39
|
0 |
28 |
ref $_[0] ? :
|
|
42
|
0 |
28 |
$^O eq 'MSWin32' ? :
|
|
46
|
28 |
0 |
ref $args->{'lite_path'} ? :
|
|
77
|
39 |
6 |
if $self->{'t'} and @{$self->apps;} and not $self->{'stopped'}[-1]
|
|
114
|
3435 |
2 |
unless defined $data
|
|
126
|
0 |
2 |
unless -d "$home/lib"
|
|
145
|
64 |
6 |
if (defined $index) { }
|
|
172
|
0 |
0 |
if $self->{'auth_url'} and $self->{'auth_url'}
|
|
176
|
0 |
20 |
unless defined $self->{'apps'}[$i]
|
|
178
|
1 |
19 |
if $stopped
|
|
222
|
20 |
0 |
unless (defined $class)
|
|
224
|
20 |
0 |
if (eval ' require Clustericious::Config::Helpers; 1') { }
|
|
|
0 |
0 |
elsif (eval ' Clustericious::Config::Plugin; 1 ') { }
|
|
236
|
0 |
20 |
unless $class
|
|
265
|
0 |
20 |
if $caller ne 'main'
|
|
270
|
17 |
3 |
if -d "$home/lib"
|
|
282
|
31 |
3 |
unless (ref $item)
|
|
287
|
6 |
25 |
if (Mojo::Loader::data_section($caller, $fn))
|
|
293
|
9 |
25 |
if (ref $item eq 'ARRAY') { }
|
|
296
|
6 |
3 |
unless (ref $config)
|
|
299
|
1 |
5 |
unless -d "$home/etc"
|
|
314
|
0 |
34 |
$app_name =~ /\.psgi$/ ? :
|
|
325
|
34 |
0 |
unless (defined $app)
|
|
341
|
4 |
30 |
unless (defined $app)
|
|
343
|
1 |
3 |
if (my $script = Mojo::Loader::data_section($caller, "script/$app_name"))
|
|
346
|
1 |
0 |
unless -d "$home/script"
|
|
348
|
0 |
1 |
if (my $error = $@)
|
|
352
|
0 |
4 |
if (my $script = Mojo::Loader::data_section($caller, "script/$psgi_name"))
|
|
364
|
3 |
31 |
unless (defined $app)
|
|
368
|
2 |
9 |
if (not $app_name =~ /\.psgi$/ and $^O eq 'MSWin32' && -e "$dir/$app_name" || -x "$dir/$app_name")
|
|
372
|
0 |
2 |
if (my $error = $@)
|
|
377
|
0 |
9 |
if (-e "$dir/$psgi_name")
|
|
387
|
1 |
33 |
unless (defined $app)
|
|
389
|
1 |
0 |
if $first_try_error
|
|
394
|
33 |
1 |
if (defined $app)
|
|
397
|
12 |
22 |
if (eval {
do {
$app->isa('Clustericious::App')
}
})
|
|
399
|
0 |
12 |
if ($app->can('auth_ua'))
|
|
403
|
0 |
0 |
unless defined $self->{'auth_ua'}
|
|
409
|
12 |
22 |
if ($app and $app->isa('Clustericious::App'))
|
|
414
|
4 |
8 |
unless (-e $fn)
|
|
428
|
0 |
34 |
if defined $cb
|
|
434
|
7 |
13 |
if ($INC{'Clustericious/App.pm'})
|
|
437
|
7 |
0 |
if (not $@ and 'Clustericious::Client'->can('_mojo_user_agent_factory'))
|
|
445
|
20 |
0 |
if (defined $self->{'t'})
|
|
461
|
0 |
4 |
if (eval ' use Clustericious; 1 ' and not eval ' use Clustericious 0.9925; 1 ')
|
|
468
|
1 |
3 |
if ($self->{'auth_ua'} or $self->{'auth_url'}) { }
|
|
486
|
0 |
3 |
if (my $error = $@)
|
|
510
|
4 |
1 |
if (defined $app) { }
|
|
517
|
0 |
4 |
if $error
|
|
519
|
1 |
0 |
if ($index == $#{$self->apps;} and $self->{'t'})
|
|
531
|
4 |
1 |
if $ok
|
|
537
|
1 |
4 |
if $error
|
|
553
|
4 |
1 |
if (defined $app) { }
|
|
560
|
0 |
4 |
if (my $error = $@)
|
|
573
|
4 |
1 |
if $ok
|
|
575
|
1 |
0 |
if ($index == $#{$self->apps;} and $self->{'t'})
|
|
583
|
1 |
4 |
if $error
|
|
633
|
2 |
24 |
unless (ref $regex eq 'Regexp')
|
|
647
|
11 |
41 |
unless $name =~ /$regex/
|
|
651
|
28 |
13 |
unless (-d "$home/$dir")
|
|
656
|
39 |
2 |
unless (-f "$home/$dir/$basename")
|
|
674
|
1 |
5 |
unless eval {
do {
$app->isa('Clustericious::App')
}
}
|
|
676
|
1 |
4 |
unless ($client_class->can('new') or eval " require $client_class; $client_class->isa('Clustericious::Client') ")
|