line |
true |
false |
branch |
58
|
0 |
6 |
unless ref(my $self = shift()) |
67
|
1 |
16 |
if ($line =~ /^\@prefix # string begins with a @prefix grammar
\s+
(\S*:) # zero or more non whitespace chars
# followed by a colon - namespace key
\s+
< # open angle bracket
(\S+) # one or more non whitepace chars
# - namespace value
> # close angle bracket
\s+
.
/x) |
81
|
1 |
16 |
if ($line =~ /^\@base # string begins with a @base grammar
\s+
<([^>]*)> # angle brackets enclosed by any non
# closing angle bracket chars - base
\s+
. # any non \n char
\s*
$/x) |
102
|
0 |
7 |
unless ref(my $self = shift()) |
114
|
0 |
1 |
unless ref(my $self = shift()) |