The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<!DOCTYPE html
     PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--
This file was generated by Devel::Cover Version 1.26
Devel::Cover is copyright 2001-2012, Paul Johnson (paul@pjcj.net)
Devel::Cover is free. It is licensed under the same terms as Perl itself.
The latest version of Devel::Cover should be available from my homepage:
http://www.pjcj.net
-->
<head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8"></meta>
    <meta http-equiv="Content-Language" content="en-us"></meta>
    <link rel="stylesheet" type="text/css" href="cover.css"></link>
    <link rel="stylesheet" type="text/css" href="cover.css"></link>
    <title>Branch Coverage: lib/Yukki/Web/Plugin/Spreadsheet.pm</title>
</head>
<body>
<h1>Branch Coverage</h1>
<table>
<tr><td class="h" align="right">File:</td><td align="left">lib/Yukki/Web/Plugin/Spreadsheet.pm</td></tr>
<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">18.2%</td></tr>
</table>
<div><br/></div>
<table>
<tr><th>line</th><th>%</th><th colspan="2">coverage</th><th>branch</th></tr>
<tr><td class="h"><a id="L90">90</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if $name</td></tr>
<tr><td class="h"><a id="L121">121</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if defined $new_cell</td></tr>
<tr><td class="h"><a id="L139">139</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($name =~ /!/u)</td></tr>
<tr><td class="h"><a id="L143">143</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($path =~ /^(\w+):/u) { }</td></tr>
<tr><td class="h"><a id="L160">160</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless $other_file-&gt;repository_name eq $file-&gt;repository_name and $other_file-&gt;full_path eq $file-&gt;full_path</td></tr>
<tr><td class="h"><a id="L169">169</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless defined $cell</td></tr>
<tr><td class="h"><a id="L204">204</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (&amp;blessed($_) and $_-&gt;isa(&#39;Yukki::Error&#39;)) { }</td></tr>
<tr><td class="h"><a id="L213">213</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">unless $error</td></tr>
<tr><td class="h"><a id="L217">217</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">defined $name ? :</td></tr>
<tr><td class="h"><a id="L219">219</a></td><td class="c0">50</td><td class="c0">T</td><td class="c3">F</td><td class="s">if ($raw-&gt;{&#39;cellerrors&#39;}{$new_cell}) { }</td></tr>
<tr><td class="h"><a id="L240">240</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless $file-&gt;exists</td></tr>
</table>
</body>
</html>