blib/lib/App/rdfns.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 28 | 64.2 |
line | true | false | branch |
---|---|---|---|
18 | 0 | 8 | if not @ARGV or $ARGV[0] =~ /^(-[?h]|--help)$/ |
19 | 0 | 8 | if $ARGV[0] =~ /^(-v|--version)$/ |
20 | 0 | 8 | if $ARGV[0] eq "--dates" |
26 | 2 | 9 | if ($a =~ /^([0-9]{8})$/) |
31 | 4 | 5 | if ($a =~ qr"^https?://") { } |
0 | 5 | elsif ($a =~ /:/) { } | |
2 | 3 | elsif ($a =~ s/\.([^.]+)$//) { } | |
33 | 2 | 2 | if ($qname) |
41 | 1 | 1 | if ($f eq 'prefix') { } |
1 | 0 | elsif ($f =~ /$RDF::NS::FORMATS/) { } | |
42 | 1 | 0 | if defined $_ |
52 | 1 | 7 | if (lc $format eq 'json') { } |
88 | 0 | 0 | if /^#/ |
90 | 0 | 0 | if ($fields[2] ne $date) |