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()) { } |
284
|
0 |
0 |
if debug_mod12() |
286
|
0 |
0 |
unless ($format eq 'production') |
303
|
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") { } |
|
0 |
0 |
elsif (-f "$story_dir/story.ps1") { } |
305
|
0 |
0 |
if (-f project_root_dir() . '/cpanfile') { } |
306
|
0 |
0 |
if ($^O =~ /MSWin/) { } |
325
|
0 |
0 |
if (-f project_root_dir() . '/Gemfile') { } |
354
|
0 |
0 |
if ($^O =~ /MSWin/) { } |
369
|
0 |
0 |
if debug_mod12() |
373
|
0 |
0 |
if $format eq 'production' |
375
|
0 |
0 |
if ($ex_code == 0) { } |
|
0 |
0 |
elsif (ignore_story_err()) { } |
376
|
0 |
0 |
unless $format eq 'production' |
387
|
0 |
0 |
if ($format eq 'production') { } |
430
|
0 |
0 |
if debug_mod2() |
439
|
0 |
0 |
if ($@) |
444
|
0 |
0 |
unless get_prop('scenario_status') |
446
|
0 |
0 |
unless $story_check_file |
447
|
0 |
0 |
unless -s $story_check_file |
450
|
0 |
0 |
unless open my $fh, $story_check_file |
458
|
0 |
0 |
if $r->{'type'} eq 'debug' |
459
|
0 |
0 |
if ($r->{'type'} eq 'check_expression') |
461
|
0 |
0 |
unless $r->{'status'} |
462
|
0 |
0 |
if ($format eq 'production') { } |
463
|
0 |
0 |
unless $r->{'status'} |
467
|
0 |
0 |
unless $r->{'status'} |
473
|
0 |
0 |
if ($err) |
478
|
0 |
0 |
if ($format eq 'production' and $check_fail) |
501
|
0 |
0 |
if ($format ne 'concise') |
502
|
0 |
0 |
if ($status) { } |
503
|
0 |
0 |
nocolor() ? : |
505
|
0 |
0 |
nocolor() ? : |
509
|
0 |
0 |
if ($status == 0 and $STATUS != 0) |
510
|
0 |
0 |
$exit_code == 1 ? : |
521
|
0 |
0 |
unless $no_new_line |
528
|
0 |
0 |
unless open META, get_prop('story_dir') . '/meta.txt' |
537
|
0 |
0 |
nocolor() ? : |
556
|
0 |
0 |
$^O =~ /MSWin/ ? : |
|
0 |
0 |
unless $i++ < $cwd_size |
562
|
0 |
0 |
$^O =~ /MSWin/ ? : |
566
|
0 |
0 |
if $short_story_dir |
567
|
0 |
0 |
if $story_vars |