| line |
true |
false |
branch |
|
227
|
0 |
17 |
unless ($class) |
|
253
|
4 |
13 |
if $params{'manifest'} |
|
258
|
3 |
2 |
$params{'check_count'} >= 2 ? : |
|
|
5 |
2 |
$params{'check_count'} ? : |
|
|
7 |
10 |
exists $params{'check_count'} ? : |
|
265
|
0 |
17 |
if ($params{'file_content'}) |
|
266
|
0 |
0 |
unless &Params::Util::_CODE($params{'file_content'}) |
|
269
|
0 |
0 |
unless $self->{'ContentHandler'} = 'Test::Inline::Content::Legacy'->new($params{'file_content'}) |
|
282
|
3 |
14 |
defined $params{'output'} ? : |
|
378
|
0 |
13 |
unless my $source = $self->_source(shift()) |
|
379
|
12 |
1 |
if (ref $source) { } |
|
407
|
0 |
0 |
unless my $name = shift() |
|
413
|
0 |
0 |
$options{'recursive'} ? : |
|
415
|
0 |
0 |
unless $files |
|
421
|
0 |
0 |
unless defined $rv |
|
449
|
0 |
1 |
if $@ |
|
458
|
0 |
2 |
unless my $files = $self->InputHandler->find(shift()) |
|
463
|
0 |
7 |
unless my $source = $self->InputHandler->read($file) |
|
465
|
0 |
7 |
unless defined $rv |
|
475
|
0 |
20 |
unless my $source = &Params::Util::_SCALAR(shift()) |
|
478
|
0 |
20 |
unless my $Extract = $self->ExtractHandler->new($source) |
|
480
|
3 |
17 |
unless my $elements = $Extract->elements |
|
483
|
1 |
16 |
unless my $Sections = 'Test::Inline::Section'->parse($elements) |
|
490
|
0 |
49 |
unless my $context = $Section->context |
|
502
|
0 |
20 |
if ($Classes->{$_class}) |
|
511
|
0 |
20 |
unless my $File = 'Test::Inline::Script'->new($_class, $classes{$_class}, $self->{'check_count'}) |
|
565
|
29 |
6 |
if $self->{'filenames'} |
|
568
|
0 |
6 |
unless my $Algorithm = 'Algorithm::Dependency::Ordered'->new('source', $self, 'ignore_orphans', 1) |
|
575
|
0 |
6 |
unless ($Algorithm->source->items) |
|
578
|
0 |
6 |
unless my $schedule = $Algorithm->schedule_all |
|
609
|
7 |
1 |
if $self->{'schedule'} |
|
612
|
0 |
1 |
unless $self->filenames |
|
633
|
0 |
8 |
unless my $schedule = $self->schedule |
|
634
|
0 |
8 |
unless $self->{'manifest'} |
|
635
|
0 |
8 |
unless @$schedule |
|
643
|
0 |
8 |
unless defined $relative_path |
|
647
|
7 |
1 |
if (length $relative_path) |
|
671
|
0 |
4 |
unless $filenames |
|
675
|
0 |
4 |
unless defined $manifest |
|
676
|
4 |
0 |
if ($manifest) |
|
677
|
4 |
0 |
if ($self->OutputHandler->write($self->{'manifest'}, $manifest)) { } |
|
688
|
0 |
14 |
unless $self->_save($class) |
|
697
|
0 |
29 |
unless my $filenames = $self->filenames |
|
703
|
0 |
14 |
unless my $class = shift() |
|
704
|
0 |
14 |
unless my $filename = $self->_file($class) |
|
708
|
0 |
14 |
unless my $content = $self->_content($class) |
|
710
|
14 |
0 |
if ($self->{'output'}) |
|
713
|
0 |
14 |
unless ($self->OutputHandler->write($filename, $content)) |
|
724
|
0 |
15 |
unless my $class = shift() |
|
725
|
0 |
15 |
unless my $filename = $self->_file($class) |
|
726
|
0 |
15 |
unless my $Script = $self->class($class) |
|
731
|
0 |
15 |
unless defined $content |
|
760
|
0 |
13 |
unless defined $_[0] |
|
761
|
13 |
0 |
unless (ref $_[0]) |
|
762
|
12 |
1 |
if ($self->InputHandler->exists_file($_[0])) { } |
|
|
1 |
0 |
elsif ($self->InputHandler->exists_dir($_[0])) { } |
|
771
|
0 |
0 |
if (&Params::Util::_SCALAR($_[0])) |
|
775
|
0 |
0 |
if (&Params::Util::_INSTANCE($_[0], 'IO::Handle')) |
|
790
|
73 |
0 |
unless $self->{'verbose'} |
|
797
|
0 |
0 |
if ($self->exception) |