Branch Coverage

blib/lib/Path/Trim.pm
Criterion Covered Total %
branch 16 16 100.0


line true false branch
48 64 64 if ($path =~ s/^\Q$directory_separator\E//)
51 64 64 if ($path =~ s/\Q$directory_separator\E$//)
58 160 240 if ($dir eq $parent_directory) { }
112 128 elsif ($dir ne $current_directory) { }
59 40 120 if (@new_path and $new_path[-1] ne $parent_directory) { }
71 16 112 unless (@new_path)
76 64 64 if ($left_stripped)
79 64 64 if ($right_stripped)