Branch Coverage

blib/lib/Treex/Core/Files.pm
Criterion Covered Total %
branch 17 40 42.5


line true false branch
47 0 10 if ($args->{'filenames'}) { }
10 0 elsif (defined $args->{'string'}) { }
62 0 10 if ($string =~ /^!(.+)/)
64 0 0 unless @filenames
73 0 10 if ($token =~ /^!(.+)/)
75 0 0 unless @filenames
78 9 1 unless $token =~ s/^@(.*)/$1/
79 0 1 $token eq '-' ? :
84 1 0 if $dir eq '.'
85 0 0 !m[^/] ? :
95 1 4 if $self->file_number == 0 or $self->file_number > @{$self->filenames;}
115 0 0 if (-f $filename)
128 1 1 if (not defined $filename) { }
0 1 elsif ($filename eq '-') { }
136 0 1 $filename =~ /[.]gz$/ ? :
138 0 1 unless &Treex::Core::Files::open($FH, $mode, $filename)
146 1 1 unless my $FH = $self->next_filehandle
156 0 0 unless $FH or $self->join_files_for_next_line
157 0 0 unless ($FH)
158 0 0 unless $FH = $self->next_filehandle