| line |
true |
false |
branch |
|
51
|
0 |
0 |
if debug_mod2() |
|
62
|
0 |
0 |
if debug_mod2() |
|
66
|
0 |
0 |
if ($format eq 'production') { } |
|
90
|
0 |
0 |
unless (config()) |
|
91
|
0 |
0 |
if (get_prop('ini_file_path') and -f get_prop('ini_file_path')) { } |
|
|
0 |
0 |
elsif (get_prop('yaml_file_path') and -f get_prop('yaml_file_path')) { } |
|
|
0 |
0 |
elsif (get_prop('json_file_path') and -f get_prop('json_file_path')) { } |
|
|
0 |
0 |
elsif (-f 'suite.ini') { } |
|
|
0 |
0 |
elsif (-f 'suite.yaml') { } |
|
|
0 |
0 |
elsif (-f 'suite.json') { } |
|
93
|
0 |
0 |
unless my(%c) = 'Config::General'->new('-InterPolateVars', 1, '-InterPolateEnv', 1, '-ConfigFile', $path)->getall |
|
104
|
0 |
0 |
unless open DATA, $path |
|
110
|
0 |
0 |
unless my(%c) = 'Config::General'->new('-InterPolateVars', 1, '-InterPolateEnv', 1, '-ConfigFile', $path)->getall |
|
121
|
0 |
0 |
unless open DATA, $path |
|
132
|
0 |
0 |
if (-f 'suite.ini') { } |
|
|
0 |
0 |
elsif (-f 'suite.yaml') { } |
|
|
0 |
0 |
elsif (-f 'suite.json') { } |
|
134
|
0 |
0 |
unless my(%c) = 'Config::General'->new('-InterPolateVars', 1, '-InterPolateEnv', 1, '-ConfigFile', $path)->getall |
|
145
|
0 |
0 |
unless open DATA, $path |
|
156
|
0 |
0 |
if (my $args_file = get_prop('args_file')) { } |
|
157
|
0 |
0 |
unless open ARGS_FILE, $args_file |
|
160
|
0 |
0 |
unless $l =~ /\S/ |
|
174
|
0 |
0 |
if ($rp =~ s/=(.*)//) { } |
|
185
|
0 |
0 |
unless defined $root->{$path} |
|
191
|
0 |
0 |
unless open CONFIG, '>', story_cache_dir() . '/config.json' |
|
197
|
0 |
0 |
if debug_mod12() |
|
200
|
0 |
0 |
unless (get_prop('cli_args')) |
|
201
|
0 |
0 |
if ($config_res->{'args'} and ref $config_res->{'args'} eq 'ARRAY') |
|
202
|
0 |
0 |
if debug_mod12() |
|
205
|
0 |
0 |
if (not ref $item) { } |
|
|
0 |
0 |
elsif (ref $item eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $item eq 'ARRAY') { } |
|
210
|
0 |
0 |
if ($k1 =~ s/^~//) { } |
|
219
|
0 |
0 |
$v =~ s/^~// ? : |
|
223
|
0 |
0 |
if debug_mod12() |
|
228
|
0 |
0 |
unless open CLI_ARGS, '>', story_cache_dir() . '/cli_args' |
|
233
|
0 |
0 |
if debug_mod12() |
|
240
|
0 |
0 |
if (get_prop('cwd')) |
|
241
|
0 |
0 |
unless (chdir get_prop('cwd')) |
|
258
|
0 |
0 |
if ($format eq 'production') { } |
|
|
0 |
0 |
elsif ($format ne 'concise') { } |
|
261
|
0 |
0 |
nocolor() ? : |
|
263
|
0 |
0 |
if ($format eq 'production') { } |
|
272
|
0 |
0 |
if defined get_prop('stdout') |
|
280
|
0 |
0 |
if (get_stdout()) { } |
|
285
|
0 |
0 |
if debug_mod12() |
|
287
|
0 |
0 |
unless ($format eq 'production') |
|
304
|
0 |
0 |
if (-f "$story_dir/story.pl") { } |
|
|
0 |
0 |
elsif (-f "$story_dir/story.rb") { } |
|
|
0 |
0 |
elsif (-f "$story_dir/story.py") { } |
|
|
0 |
0 |
elsif (-f "$story_dir/story.bash") { } |
|
306
|
0 |
0 |
if (-f project_root_dir() . '/cpanfile') { } |
|
321
|
0 |
0 |
if (-f project_root_dir() . '/Gemfile') { } |
|
355
|
0 |
0 |
if $format eq 'production' |
|
357
|
0 |
0 |
if ($ex_code == 0) { } |
|
|
0 |
0 |
elsif (ignore_story_err()) { } |
|
358
|
0 |
0 |
unless $format eq 'production' |
|
369
|
0 |
0 |
if ($format eq 'production') { } |
|
412
|
0 |
0 |
if debug_mod2() |
|
421
|
0 |
0 |
if ($@) |
|
426
|
0 |
0 |
unless get_prop('scenario_status') |
|
428
|
0 |
0 |
unless $story_check_file |
|
429
|
0 |
0 |
unless -s $story_check_file |
|
432
|
0 |
0 |
unless open my $fh, $story_check_file |
|
440
|
0 |
0 |
if $r->{'type'} eq 'debug' |
|
441
|
0 |
0 |
if ($r->{'type'} eq 'check_expression') |
|
443
|
0 |
0 |
unless $r->{'status'} |
|
444
|
0 |
0 |
if ($format eq 'production') { } |
|
445
|
0 |
0 |
unless $r->{'status'} |
|
449
|
0 |
0 |
unless $r->{'status'} |
|
455
|
0 |
0 |
if ($err) |
|
460
|
0 |
0 |
if ($format eq 'production' and $check_fail) |
|
468
|
0 |
0 |
if $out =~ /outthentic_message/ |
|
482
|
0 |
0 |
if ($format ne 'concise') |
|
483
|
0 |
0 |
if ($status) { } |
|
484
|
0 |
0 |
nocolor() ? : |
|
486
|
0 |
0 |
nocolor() ? : |
|
490
|
0 |
0 |
if ($status == 0 and $STATUS != 0) |
|
491
|
0 |
0 |
$exit_code == 1 ? : |
|
502
|
0 |
0 |
unless $no_new_line |
|
509
|
0 |
0 |
unless open META, get_prop('story_dir') . '/meta.txt' |
|
518
|
0 |
0 |
nocolor() ? : |
|
537
|
0 |
0 |
unless $i++ < $cwd_size |
|
547
|
0 |
0 |
if $short_story_dir |
|
548
|
0 |
0 |
if $story_vars |