|
3 | 3 | "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
4 | 4 | <html xmlns="http://www.w3.org/1999/xhtml">
|
5 | 5 | <!--
|
6 |
| -This file was generated by Devel::Cover Version 1.33 |
7 |
| -Devel::Cover is copyright 2001-2019, Paul Johnson (paul@pjcj.net) |
| 6 | +This file was generated by Devel::Cover Version 1.30 |
| 7 | +Devel::Cover is copyright 2001-2017, Paul Johnson (paul@pjcj.net) |
8 | 8 | Devel::Cover is free. It is licensed under the same terms as Perl itself.
|
9 | 9 | The latest version of Devel::Cover should be available from my homepage:
|
10 | 10 | http://www.pjcj.net
|
|
20 | 20 | <h1>Branch Coverage</h1>
|
21 | 21 | <table>
|
22 | 22 | <tr><td class="h" align="right">File:</td><td align="left">blib/lib/WebService/Hexonet/Connector/APIClient.pm</td></tr>
|
23 |
| -<tr><td class="h" align="right">Coverage:</td><td align="left" class="c1">85.0%</td></tr> |
| 23 | +<tr><td class="h" align="right">Coverage:</td><td align="left" class="c1">85.9%</td></tr> |
24 | 24 | </table>
|
25 | 25 | <div><br/></div>
|
26 | 26 | <table>
|
27 | 27 | <tr><th>line</th><th>%</th><th colspan="2">coverage</th><th>branch</th></tr>
|
28 |
| -<tr><td class="h"><a id="L60">60</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (ref $cmd eq "HASH")</td></tr> |
29 |
| -<tr><td class="h"><a id="L62">62</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $cmd->{$key})</td></tr> |
30 |
| -<tr><td class="h"><a id="L70">70</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (utf8::is_utf8($tmp))</td></tr> |
31 |
| -<tr><td class="h"><a id="L81">81</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $sessid)</td></tr> |
32 |
| -<tr><td class="h"><a id="L96">96</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless (length $self->{'ua'})</td></tr> |
33 |
| -<tr><td class="h"><a id="L118">118</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (exists $self->{'curlopts'}{'PROXY'})</td></tr> |
34 |
| -<tr><td class="h"><a id="L127">127</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $proxy == 0) { }</td></tr> |
35 |
| -<tr><td class="h"><a id="L138">138</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (exists $self->{'curlopts'}{'REFERER'})</td></tr> |
36 |
| -<tr><td class="h"><a id="L147">147</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $referer == 0) { }</td></tr> |
37 |
| -<tr><td class="h"><a id="L229">229</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
38 |
| -<tr><td class="h"><a id="L232">232</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if (defined $col)</td></tr> |
39 |
| -<tr><td class="h"><a id="L246">246</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">unless (defined $otpc)</td></tr> |
40 |
| -<tr><td class="h"><a id="L255">255</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
41 |
| -<tr><td class="h"><a id="L258">258</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if (defined $col)</td></tr> |
42 |
| -<tr><td class="h"><a id="L271">271</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
43 |
| -<tr><td class="h"><a id="L294">294</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($referer)</td></tr> |
44 |
| -<tr><td class="h"><a id="L298">298</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($proxy)</td></tr> |
45 |
| -<tr><td class="h"><a id="L304">304</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($r->is_success) { }</td></tr> |
46 |
| -<tr><td class="h"><a id="L306">306</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($self->{'debugMode'})</td></tr> |
47 |
| -<tr><td class="h"><a id="L314">314</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($self->{'debugMode'})</td></tr> |
48 |
| -<tr><td class="h"><a id="L327">327</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if (defined $mycmd->{'LAST'})</td></tr> |
49 |
| -<tr><td class="h"><a id="L331">331</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $mycmd->{'FIRST'})</td></tr> |
50 |
| -<tr><td class="h"><a id="L337">337</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($first < $total)</td></tr> |
51 |
| -<tr><td class="h"><a id="L409">409</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($newkey ne $key)</td></tr> |
52 |
| -<tr><td class="h"><a id="L412">412</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (ref $cmd->{$newkey} eq "ARRAY")</td></tr> |
53 |
| -<tr><td class="h"><a id="L429">429</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($cmd->{'COMMAND'} =~ /^CONVERTIDN$/imsux)</td></tr> |
54 |
| -<tr><td class="h"><a id="L433">433</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (scalar @keys == 0)</td></tr> |
55 |
| -<tr><td class="h"><a id="L440">440</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($val =~ /[^[:lower:]\d. -]/imsux)</td></tr> |
56 |
| -<tr><td class="h"><a id="L450">450</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($r->isSuccess)</td></tr> |
57 |
| -<tr><td class="h"><a id="L452">452</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($col)</td></tr> |
| 28 | +<tr><td class="h"><a id="L59">59</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $secured and $secured == 1)</td></tr> |
| 29 | +<tr><td class="h"><a id="L63">63</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (ref $cmd eq 'HASH') { }</td></tr> |
| 30 | +<tr><td class="h"><a id="L65">65</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $cmd->{$key})</td></tr> |
| 31 | +<tr><td class="h"><a id="L74">74</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $secured and $secured == 1)</td></tr> |
| 32 | +<tr><td class="h"><a id="L78">78</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (utf8::is_utf8($tmp))</td></tr> |
| 33 | +<tr><td class="h"><a id="L89">89</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $sessid)</td></tr> |
| 34 | +<tr><td class="h"><a id="L104">104</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless (length $self->{'ua'})</td></tr> |
| 35 | +<tr><td class="h"><a id="L126">126</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (exists $self->{'curlopts'}{'PROXY'})</td></tr> |
| 36 | +<tr><td class="h"><a id="L135">135</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $proxy == 0) { }</td></tr> |
| 37 | +<tr><td class="h"><a id="L146">146</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (exists $self->{'curlopts'}{'REFERER'})</td></tr> |
| 38 | +<tr><td class="h"><a id="L155">155</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (length $referer == 0) { }</td></tr> |
| 39 | +<tr><td class="h"><a id="L237">237</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
| 40 | +<tr><td class="h"><a id="L240">240</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if (defined $col)</td></tr> |
| 41 | +<tr><td class="h"><a id="L254">254</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">unless (defined $otpc)</td></tr> |
| 42 | +<tr><td class="h"><a id="L263">263</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
| 43 | +<tr><td class="h"><a id="L266">266</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if (defined $col)</td></tr> |
| 44 | +<tr><td class="h"><a id="L279">279</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($rr->isSuccess)</td></tr> |
| 45 | +<tr><td class="h"><a id="L303">303</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($referer)</td></tr> |
| 46 | +<tr><td class="h"><a id="L307">307</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($proxy)</td></tr> |
| 47 | +<tr><td class="h"><a id="L312">312</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($r->is_success) { }</td></tr> |
| 48 | +<tr><td class="h"><a id="L314">314</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($self->{'debugMode'})</td></tr> |
| 49 | +<tr><td class="h"><a id="L322">322</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($self->{'debugMode'})</td></tr> |
| 50 | +<tr><td class="h"><a id="L335">335</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if (defined $mycmd->{'LAST'})</td></tr> |
| 51 | +<tr><td class="h"><a id="L339">339</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $mycmd->{'FIRST'})</td></tr> |
| 52 | +<tr><td class="h"><a id="L345">345</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($first < $total)</td></tr> |
| 53 | +<tr><td class="h"><a id="L417">417</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($newkey ne $key)</td></tr> |
| 54 | +<tr><td class="h"><a id="L420">420</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (ref $cmd->{$newkey} eq 'ARRAY')</td></tr> |
| 55 | +<tr><td class="h"><a id="L437">437</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($cmd->{'COMMAND'} =~ /^CONVERTIDN$/imsux)</td></tr> |
| 56 | +<tr><td class="h"><a id="L441">441</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (scalar @keys == 0)</td></tr> |
| 57 | +<tr><td class="h"><a id="L448">448</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($val =~ /[^[:lower:]\d. -]/imsux)</td></tr> |
| 58 | +<tr><td class="h"><a id="L458">458</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($r->isSuccess)</td></tr> |
| 59 | +<tr><td class="h"><a id="L460">460</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($col)</td></tr> |
58 | 60 | </table>
|
59 | 61 | </body>
|
60 | 62 | </html>
|
0 commit comments