Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

added firsts tests and testdata

  • Loading branch information...
commit cba25b5d9f2a8d0e838b981311b03607a4c90eee 1 parent 91f9567
@domm authored
View
11 t/00-load.t
@@ -0,0 +1,11 @@
+#!/usr/bin/perl
+# generated with /home/domm/validad/RevDev-Utils/bin/generate_00-load_t.pl
+use Test::More tests => 1;
+
+
+BEGIN {
+ use_ok( 'App::ArchiveDevelCover' );
+}
+
+diag( "Testing App::ArchiveDevelCover App::ArchiveDevelCover->VERSION, Perl $], $^X" );
+
View
41 t/archive.t
@@ -0,0 +1,41 @@
+use 5.010;
+use strict;
+use warnings;
+use lib qw(t);
+
+use Test::Most;
+use Test::Trap;
+use Test::File;
+use testdata::setup;
+use App::ArchiveDevelCover;
+
+my $temp = testdata::setup::tmpdir();
+
+{ # first archive
+ my $run = testdata::setup::run($temp,'run_1');
+
+ my $a = App::ArchiveDevelCover->new(
+ from=>$run,
+ to=>$temp->subdir('archive'),
+ project=>'first test',
+ );
+ trap { $a->run; };
+ is ( $trap->exit, undef, 'exit() == undef' );
+ like($trap->stdout,qr/archived coverage reports at $temp/,'command output location');
+
+ foreach my $file (qw(index.html cover.css archive_db)) {
+ file_exists_ok($temp->file('archive',$file));
+ }
+}
+
+{ # archive the same run again
+ my $a = App::ArchiveDevelCover->new(
+ from=>$temp->subdir('run_1'),
+ to=>$temp->subdir('archive'),
+ );
+ trap { $a->run; };
+ is ( $trap->exit, 0, 'exit() == 0' );
+ like($trap->stdout,qr/This coverage report has already been archived/i,'command output again');
+}
+
+done_testing();
View
1  t/testdata/run_1/cover.13
@@ -0,0 +1 @@
+{"runs":{"1329767813.14186.47438":{"count":{"lib/App/ArchiveDevelCover.pm":{"pod":[0,0,0,0,0],"subroutine":[1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0],"statement":[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0],"time":[65861,5,33,5,3,77,472,391002,12,42126,352675,23,1208,211378,23,5703,1806,49,12219,17043,9],"branch":[[0,0],[0,0],[0,0],[0,0],[0,0],[0,0],[0,0],[0,0],[0,0],[0,0]],"condition":[[0,0,0],[0,0]]}},"finish":1329767813599690,"digests":{"t/00-load.t":"e6d9d8a7624a697b616a7de9a2122700","lib/App/ArchiveDevelCover.pm":"608646b117bab1d83fbd282de2cf53e0"},"collected":["branch","condition","pod","statement","subroutine","time"],"vec":{"lib/App/ArchiveDevelCover.pm":{"pod":{"vec":"\u0000","size":5},"subroutine":{"vec":"\u0000\u0000","size":18},"statement":{"vec":"ÿÿ\u001f\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000\u0000","size":108},"branch":{"vec":"\u0000\u0000\u0000","size":20},"condition":{"vec":"\u0000","size":5}}},"perl":"118.53.46.49.52.46.49","run":"t/00-load.t","OS":"linux","start":1329767813599400}}}
View
75 t/testdata/run_1/cover.css
@@ -0,0 +1,75 @@
+/* Stylesheet for Devel::Cover HTML reports */
+
+/* You may modify this file to alter the appearance of your coverage
+ * reports. If you do, you should probably flag it read-only to prevent
+ * future runs from overwriting it.
+ */
+
+/* Note: default values use the color-safe web palette. */
+
+body {
+ font-family: sans-serif;
+}
+
+h1 {
+ background-color: #3399ff;
+ border: solid 1px #999999;
+ padding: 0.2em;
+ -moz-border-radius: 10px;
+}
+
+a {
+ color: #000000;
+}
+a:visited {
+ color: #333333;
+}
+
+table {
+ border-collapse: collapse;
+ border-spacing: 0px;
+}
+tr {
+ text-align : center;
+ vertical-align: top;
+}
+th,.h {
+ background-color: #cccccc;
+ border: solid 1px #333333;
+ padding: 0em 0.2em;
+}
+td {
+ border: solid 1px #cccccc;
+}
+
+/* source code */
+pre,.s {
+ text-align: left;
+ font-family: monospace;
+ white-space: pre;
+ padding: 0em 0.5em 0em 0.5em;
+}
+
+/* Classes for color-coding coverage information:
+ * c0 : path not covered or coverage < 75%
+ * c1 : coverage >= 75%
+ * c2 : coverage >= 90%
+ * c3 : path covered or coverage = 100%
+ */
+.c0, .c1, .c2, .c3 { text-align: right; }
+.c0 {
+ background-color: #ff9999;
+ border: solid 1px #cc0000;
+}
+.c1 {
+ background-color: #ffcc99;
+ border: solid 1px #ff9933;
+}
+.c2 {
+ background-color: #ffff99;
+ border: solid 1px #cccc66;
+}
+.c3 {
+ background-color: #99ff99;
+ border: solid 1px #009900;
+}
View
31 t/testdata/run_1/coverage.html
@@ -0,0 +1,31 @@
+<!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 0.79
+Devel::Cover is copyright 2001-2011, Paul Johnson (pjcj@cpan.org)
+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>Coverage Summary</title>
+</head>
+<body>
+<h1>Coverage Summary</h1>
+<table>
+<tr><td class="h" align="right">Database:</td><td align="left">/home/domm/perl/App-ArchiveDevelCover/cover_db</td></tr>
+</table>
+<div><br/></div>
+<table>
+<tr><th>file</th><th>stmt</th><th>bran</th><th>cond</th><th>sub</th><th>time</th><th>total</th></tr>
+<tr><td align="left"><a href="lib-App-ArchiveDevelCover-pm.html">lib/App/ArchiveDevelCover.pm</a></td><td class="c0" title="21 / 108">19.4</td><td class="c0" title="0 / 20"><a href="lib-App-ArchiveDevelCover-pm--branch.html"> 0.0</a></td><td class="c0" title="0 / 5"><a href="lib-App-ArchiveDevelCover-pm--condition.html"> 0.0</a></td><td class="c0" title="7 / 18"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html">38.9</a></td><td>100.0</td><td class="c0" title="28 / 151">18.5</td></tr>
+<tr><td align="left">Total</td><td class="c0" title="21 / 108">19.4</td><td class="c0" title="0 / 20"> 0.0</td><td class="c0" title="0 / 5"> 0.0</td><td class="c0" title="7 / 18">38.9</td><td>100.0</td><td class="c0" title="28 / 151">18.5</td></tr>
+</table>
+</body>
+</html>
View
1  t/testdata/run_1/digests
@@ -0,0 +1 @@
+{"8c7e54ed5c12598189b4a9a2eff39445":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Accessor.pm","eb3d1bb78dd3cec22e05ebbe19f3734a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Cwd.pm","4a9b2a5bdd05b8f12371f0bd13135b95":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/integer.pm","c04a701bac73f3d9f7e05d2fe08b8a56":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/Base.pm","36ca2190e6ec62ee3c29c6fc878c61c3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Class/Singleton.pm","661366286e6010b21ecb8cb7391df3a4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition_or_2.pm","e9312cf0b3516c9fcdaf6ab781c992ae":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/XSLoader.pm","06296fd2eacc298b589773c44b5a5ed1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale/Base.pm","083c3fe866ec1be9c84540b9ac8e6eee":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Symbol.pm","d482130e5afead3380691198c7f5e0dd":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Module.pm","f4ae0100ac6ebce97504520980dbfad0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Class.pm","43ddb0e6b81bae5827a52458a89a62bd":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized/Meta/Role/Parameterizable.pm","dd06b8baf92b92a760c3f1b4aeee356c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP.pm","608646b117bab1d83fbd282de2cf53e0":"lib/App/ArchiveDevelCover.pm","4a0322588f3409f83f68553f538f5e48":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/Path/Class.pm","4a982eade107ffa113cf899a80efb553":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Devel/Symdump.pm","f05b0a2b8a58a3937d0c7a3ba8f31d9f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Math/Round.pm","5c19d316e9b5dc8c609a383816611440":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Getopt/Long/Descriptive/Usage.pm","bd94ded3d980db592ecc1173cc55c4ee":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB.pm","068cc40ee8b05c9bf12d0b479d512ca5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method.pm","1b337c999bc76bba46153a0e5571530c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB/File.pm","39311c5bf7f7baba92785e024df7a79a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Class/Immutable/Trait.pm","6a65bf22bdba1221ed419da659b93b22":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Pod/InputObjects.pm","271ff3a25d67b8800f407e77061c294d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/OptionTypeMap.pm","80f5ef5741a660602e987eb6f58424de":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/HTML/Entities.pm","b797910f140981ee60c3a02f3e7b0787":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/auto/POSIX/autosplit.ix","c46e2ebb720ee7d9c600ce5acbf34291":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Digest/base.pm","ebd0df707956467529740b398d394163":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone.pm","223877c24c2527ad0605531567e0e0a1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Class/Immutable/Trait.pm","cd4b874a42db8fe071b2d6d68774f839":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Delegation.pm","719c6895f36545f7ccb319a156ac9058":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/vars.pm","e607c6dfd4cc596889d41737d3c52f65":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/warnings/register.pm","6fb6237dd50052ab73353a5fb368dea0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover.pm","c572ba6bb2f713fbc01610688b8ec2e7":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/DynaLoader.pm","e4141265c1ae7cdef3adf35b655b30e6":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/Copy.pm","364da9785dc7e67d1115f40303a25075":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/File/Spec/Unix.pm","7fa58f79a260ca353ac17fad329f5c8b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB/IO.pm","1331c3b23a83f07976833aecb49b94ae":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/overload.pm","89b7dbdb694e99a1a3cc6b31bfcb0b3d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Carp.pm","19066933d30da474c4ab2ea19aac1b65":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/base.pm","f6fb612d9058a656929648b9dbfa1410":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Util/TypeConstraints.pm","cee269893f171be3995714dd98b51c79":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Package/DeprecationManager.pm","a2ff6de8e485d475cc2328fe618f218e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Error/Util.pm","4dfea5a9040ab22076e34ba1a581561b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Mixin/HasMethods.pm","047b610f4adfb4e1fcdca079370b540b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone/Floating.pm","9140e865e6ebb48b2837186bffda6017":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Exporter.pm","59ab3d2beb1094920efedffe76b948c3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Deprecated.pm","d75c1ca89c410e81b45cf4b753ef796a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Parameterizable.pm","2d74e665dc29fcc4a3869c6e274dc8e2":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Pod/Coverage.pm","318e5dc1bffe6f768c454eaa1754e4df":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Exporter/Heavy.pm","9793406a69690a2af6c694514e4ca9a0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt.pm","103e0643a53a2a7c32a3dde06475a0dc":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Method/Conflicting.pm","0844358f1683c7cbe0a74895e2b7dbf4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/namespace/clean.pm","299543c9c6998bed8122ea0f945574f4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Getopt/Long.pm","6e53da412ae27a3f025df97ef16497bd":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Variable/Magic.pm","92fe7dc38197f482c9f502911cbc3853":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/metaclass.pm","12adf212cff179f075b57a924ac442ac":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/CheckedUtilExports.pm","928bef3533c4816a412dc22a4ad6391a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/Temp.pm","1af97e22ed3243f7e3c8b8b8ec25fead":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Deprecated.pm","eaebc00f684dbd2b4e5a5380120e0e06":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Attribute.pm","45e2642a40bb2d1b2517b6b0043f0702":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/warnings.pm","52ac09eef15189613343506598b6b556":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Time.pm","23dcb26b5f6907060e97e7a1df6acbae":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Module/Runtime.pm","121a3d610900219f1efc8910d2bf572c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Class.pm","eb780ae59dc18cf243d7fb2e62e35f50":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Application/ToClass.pm","489ad279e6cb50d13740ee05eaa5241a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/Meta/Attribute.pm","ed318d155abbb239260d945b6eaab5f1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Wrapped.pm","2af87abddb75f2a19b728f0457c31833":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Subroutine.pm","1bd1a5390401d6a6fd9fcbd25872754e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB/Structure.pm","e0ba0fad19e02dcaab0399c3874072a3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized/Parameters.pm","d14b1cf8bd6a08933760200f267bffaa":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Package/Stash.pm","4603089fb8f4cdae3e91f584a4a4211e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Package.pm","4d0094a8f5164244cdb7f2ccd908aaf1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Destructor.pm","e88176796c4ad5a4ddb3473281c46eed":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Pod/Parser.pm","7bcb9016b3b6b43028460dbb2cf7f1fc":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Storable.pm","b02dd07237894c449d3f6330d9592620":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types.pm","acfcf4f0402c7e7fd26210e3772400a1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Role.pm","6d9d736655d3fd75fde58b9d48842679":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Object.pm","f404e7c7c6f0073439a0525f47fe75a4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/AutoLoader.pm","77f3633ff1eff08b14b060df4b791b29":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Application.pm","7294412e016b4f02dab7fa55d68ae148":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/Meta/Attribute/Trait.pm","29eb2dad64dd464536cc829ab861098d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/feature.pm","aba833608ccf0ba1be8ec01ff8be6cb6":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/DateTime/Infinite.pm","fcf059b16f44ad5ba5cf392c0d799b56":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Path/Class/File.pm","9fde3243857aa2d105ebb0d2ee7d99b1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/Find.pm","afeefaf5a1b357840bf56ce593fcf182":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized.pm","b93b38caa626b6afdedfd66afe475360":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Getopt/Long/Descriptive.pm","d7ec59d35b5125fe42d19f3455be8080":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Constructor.pm","ba5befbc65ffda71314bca7205b6f03e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Sub/Exporter/Util.pm","f4e99061a2c4a802c6a8450c5efda388":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized/Meta/Parameter.pm","bb92b7fe8e45373d1120ac37efbb8463":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/IO/File.pm","1eab4595a54631e21923ab7d603005bb":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Path/Class/Dir.pm","12c93bab5245c1eff1ac8198fadc1d33":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Sub/Name.pm","e7f674c1121c156235c7778899787088":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Branch.pm","8e895665a87cbb2871ec42f7c25d9298":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Enum.pm","c30b6c3fe54516077a7ed223ded9c16d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/Basename.pm","87264efaf642ac8ca3f27fddbbe9f93a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Sub/Identify.pm","ddaefc6a3903915904b245c8ebca128d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/if.pm","04c5c3ff96448f44e8b7e14d9498ccc0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/re.pm","0089511337bb2eb761a41ceb305ad7b0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Try/Tiny.pm","1edd1d4447e6339204fb7e2571728136":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Object.pm","f31d50ba8be9593f9dcdba88a59c33cf":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeCoercion.pm","b8d76dc12246e6b815e3b7d6be405c2f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/File/Glob.pm","88825d90acf1a4d125c13b7f1a014eb3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Role.pm","9ca089ffd1641ae388e493bbf28ebdd3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Application/RoleSummation.pm","bddc465e351ad0508581b94ef112d322":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/SelectSaver.pm","fdbf4739f151ec2c3ba146458946c2b5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Statement.pm","4d1f7dfa323e9115d4911724c170287b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/List/MoreUtils.pm","398e5251c926d5c9084e61d987e90d02":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Package/Stash/XS.pm","71fb7e26bd9a5c0c16810772334abbd8":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/constant.pm","9ba601d261aa0bbe58ef6db93a9a8311":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/Basic.pm","7d1c2013d32a98d6bd684212e1a31b8b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Mixin.pm","f780e9617d3615fe15e1c9e6c30806db":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Params/ValidateXS.pm","60285c7fe772bc02f7b594494c0c8528":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition_and_3.pm","f559ced1f0dfa4ef771b9cf5a4316beb":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/Load/XS.pm","27081de83704c747fac22d6fc17d08c3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method.pm","d1a148b64aeac3cefe45ef995507eef4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition.pm","a0f7f92834155c0b89dfb97805914c56":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MRO/Compat.pm","11495fe9195f878767b0f0f90fd77ab0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/B/Deparse.pm","3741fe9186eb501745a73aacf8dc4900":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Pod/Coverage/CountParents.pm","8134a060f4a085d5a6cb9b74460fa45b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition_or_3.pm","60b534488859c0510513967d091491ff":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale/en_US.pm","3d9571fdb8a4d6ff98ed632c16691b90":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Augmented.pm","bb790be3c54930386270d818178fe12c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/stat.pm","f147c95fe98e71c033b738292c7e205d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Class/Struct.pm","bad93c7ddf0444c22ddfdab8d4d9480a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/IO.pm","8a9b0525727421db36f08d4f46ceb7ae":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Util/MetaRole.pm","9177fa4c4fd0438356c986aaa6db9136":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Data/Dumper.pm","df2bfa8173ec92847085988e7167357f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeCoercion/Union.pm","810cb6b0f981b462b6038da16dc783a3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Registry.pm","6801455ffe35cf1eaef66bbd6c7169ab":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Test/More.pm","5f97dde2f1bf0f164cf56f8e7dbbb2d8":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Params/Util.pm","9a3a74c70281b656bacbec3fa9bab35a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Util/TypeConstraints/Builtins.pm","f8e4dd4de43d37a3346e903af812b2e5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/DateTime.pm","b35481c4ba8115f9473a40c4fcf1a402":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Error/Default.pm","a124fe619e7f50351623554c2c9ee454":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale.pm","2f0ef2c14e53e4c6be29ea5b2a7c9331":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Attribute.pm","a519e018b870379f0c688b9934d526c4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Mixin/AttributeCore.pm","f62813b55c062f449160100dca67d043":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/IO/Seekable.pm","9c6d1f431c40c8ebd61ec0b9526c372e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/DuckType.pm","f7b75a86c61382fad8e5a3ac07f96f00":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Time/Local.pm","37ab1a9210ac1ce2c8624431c593507c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Exporter.pm","476b5504453bbd76f20b2aa77a13ff10":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Meta.pm","e9d8beb10289f4c98fe5356ee9f75081":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Application/ToRole.pm","4a04b50f47531054d0864acecb51a139":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/parent.pm","1d76343c592b8e6d1adb366e65fac3e5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Mixin/AttributeCore.pm","bda4e1ad032b412f06e3d7450c8e0c9d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose.pm","c801504831c53731d7016239af91e80a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Object/Trait.pm","55e496bf88fb55034d5e54e5cdcf7a36":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/IO/Handle.pm","6185707beaad42e20dea1bc2fa1e3af8":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Pod.pm","1c182578a9d9a35def5848f6768e0e7e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/B.pm","22fc0201a0bd2929c33651988db90176":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Config.pm","cab3d8e96b3117bbbde11a9c7a2b23a1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Class/Load.pm","49363f6555f6c4547c5e78405a9ee2c5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Overridden.pm","b5df96cc6c5638e048ddf08d4fe351a0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/B/Hooks/EndOfScope.pm","d1dd254359351507b57b2271c382608a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/bytes.pm","a1c44155fe188c175174f1ad130d3840":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/GLD.pm","8940164bce087bcc7258124a76ea82e5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/HTML/TableExtract.pm","8b4e9c10e62ef621b4ca3a06599277e6":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/TypeDecorator.pm","828d01e54806c7f15cdace011d6c324e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB/IO/JSON.pm","e6d9d8a7624a697b616a7de9a2122700":"t/00-load.t","25aaa5ad73e86bfc8024d55900a1fe4e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint.pm","40604d8d4a99701f94931ce0a863e5b0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition_xor_4.pm","5dddd6161e397b3de92518e2ad2ec116":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/POSIX.pm","63f6f7f5f476a45ab71984c84a967339":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role.pm","2f43b3ffb69520940978f27fb75303ca":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone/Local.pm","833c3766af41b43934e9941780db27dc":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/DateTime/Helpers.pm","bbf59cb990deefd2af72fbf982d8f8a6":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Application/ToInstance.pm","65fe0b25fa9d3173be8193c63e95129d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Getopt/Long/Descriptive/Opts.pm","71531a5f7aec36451f3235c3252dfe8b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Method/Meta.pm","0000f8860018ea4bc48dcaa6bb32151f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/UndefinedType.pm","b98aa3655a2b834b81609dd92150e431":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/ProcessedArgv.pm","7f4381031333176b51b7f74ef293f730":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/Meta/Attribute/NoGetopt.pm","c59010149f1675b8132698dd5126db20":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Test/Builder.pm","3cd61929637643e680decf6433aab54f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Data/OptList.pm","8ccf7b134ee0d0bc94d3a30a22d41652":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Params/Classify.pm","d9d2c315f2d69f53942eb100c17fc088":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Attribute.pm","c985945e49378333c5574ad40f7eeade":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Method.pm","93ec0a10fdbf14b33c1c15447221e050":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/strict.pm","28e919ffb2498e5ecb87d99fedc6236a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Composite.pm","afc5af95588c2e8bd3c3d1ed0cbfd663":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Tie/Hash/NamedCapture.pm","0a0885de39cd252edeb67a1bf48a9a7a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/JSON/PP.pm","8aebd78137f220c1d9fdce9ae4f95cac":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Role/Method/Required.pm","63c6345041fb7da7826d0fe9cdc3b4c8":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/DB/Digests.pm","44e3c10eb71437c40213032a60622a6e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Devel/GlobalDestruction.pm","943acc2a68dd546d8f40afa729dce7d3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Tie/Hash.pm","02d8d3be567027ea9489ce092b6a4ba8":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Sub/Exporter.pm","db3579225d34350cd682b746df1a5ca1":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Attribute/Native.pm","122898b49e758b38abaaf53ad5b8facb":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/Moose.pm","3963df0b33fc7e069bcdc10f34b132af":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/DateTime/Duration.pm","dd68e1336eeaa4e90759eb0f5e16ae2b":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Carp/Heavy.pm","f8f652fd774a6c8c2414681bfa09b8e0":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Path/Class/Entity.pm","df02f5251ea0cd276eefcd7f11df5d18":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/MiniTrait.pm","37a6a353e253fd65a4244f58a14535ad":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/HTML/Parser.pm","bbc2d0c429653db9b339e0d127a6a9f4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Instance.pm","137e5760a00568bfc5dcca808a4ac4c2":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Mixin/HasAttributes.pm","4008d9bb1a8eeec4168f3759f06c694e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/Instance.pm","00a54ea8f05489422ad8a4061a07eb93":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale/Catalog.pm","217ac40ea8f9e4becda8a13f8ef81933":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Test/Builder/Module.pm","7315602a120fb92ac6aa2bc0f351ccf4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/IO/Dir.pm","810b139375e26bb443c5feed193f1049":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/File/Path.pm","16846e519817c2d76def9efbb1f9c725":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Carp/Clan.pm","053abfa3b0eca7f41179c61c3dba8026":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Util.pm","ee3b8509b4fc15c8faab2dd9eedc88c3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Accessor.pm","f9298e8a352b50112d773e2d7a25d1ca":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized/Meta/Role/Parameterized.pm","bbfa5cf40e82638ab323b3caa07e68f2":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/B/Debug.pm","c4713f61bc4731d636673069fb40e8da":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Types/Util.pm","37ac28744e63d3e71176bb40ec128071":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone/UTC.pm","0abc3ee127ef71235b9f3a4415bf2a9c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Getopt/Meta/Attribute/Trait/NoGetopt.pm","d5373f3b870e10a4747e42b1f6727e5a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Eval/Closure.pm","d9e5dc077947b452429358d90ff2228e":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/utf8.pm","a8003867bd5b9949248f8985919bdf51":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Generated.pm","bbeb52181137200376082b982ba159ee":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone/Catalog.pm","8f27b628bed69ffe5ccdfc6edeceadf4":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Union.pm","9c190f7204bb66eeadb90f95309978b5":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/mro.pm","b1277597e82407833359c1cb2128a432":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale/root.pm","a44ce0fb6eec1f099709997ec8e6c48d":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Sub/Install.pm","b149abb8eb39f165cb770e91b5dd02ac":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Parameterized.pm","111755666b70b24a916a48f9afb4d6a3":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Criterion.pm","2e2a257fca463213684c7dafeba7f63c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/TimeZone/OffsetOnly.pm","b2baf7ada3ddb9426aa7367e74e054ad":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Constructor.pm","b098603acdde868556abe1f91051806f":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/Pod/Find.pm","5a9b27dc9106837e8a63d4ebda82e665":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Devel/Cover/Condition_and_2.pm","9a2c1ae81c6357db6b313404d0a268ad":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/DateTime/Locale/en.pm","e8b5b461e82ad9bc5d46604b1a07dcfc":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Scalar/Util.pm","1856c133b5a2327c2e85762d5693799c":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Params/Validate.pm","a16789dbae1b7ace3081694c8a9bdd7a":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Class/MOP/Method/Inlined.pm","0af5296983506e858cc9925121a07f80":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/x86_64-linux/Moose/Meta/TypeConstraint/Class.pm","c3f82efcf73df57027d9024a04ee8785":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/Path/Class.pm","db4cc15437d9c5cb31467f1bc44ac086":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/x86_64-linux/Errno.pm","d4e2f5a42d01be46de1fa05509873dde":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/site_perl/5.14.1/MooseX/Role/Parameterized/Meta/Trait/Parameterized.pm","3b6158d7a490f429a795d171d38b4c90":"/home/domm/perl5/perlbrew/perls/perl-5.14.1/lib/5.14.1/PerlIO.pm"}
View
40 t/testdata/run_1/lib-App-ArchiveDevelCover-pm--branch.html
@@ -0,0 +1,40 @@
+<!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 0.79
+Devel::Cover is copyright 2001-2011, Paul Johnson (pjcj@cpan.org)
+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/App/ArchiveDevelCover.pm</title>
+</head>
+<body>
+<h1>Branch Coverage</h1>
+<table>
+<tr><td class="h" align="right">File:</td><td align="left">lib/App/ArchiveDevelCover.pm</td></tr>
+<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">0.0%</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="L19">19</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (-e $self-&gt;from-&gt;file(&#39;coverage.html&#39;)) { }</td></tr>
+<tr><td class="h"><a id="L35">35</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless (-e $self-&gt;to-&gt;file(&#39;index.html&#39;))</td></tr>
+<tr><td class="h"><a id="L51">51</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (-e $self-&gt;archive_db) { }</td></tr>
+<tr><td class="h"><a id="L74">74</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (-e $target)</td></tr>
+<tr><td class="h"><a id="L83">83</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless $f =~ /\.(html|css)$/</td></tr>
+<tr><td class="h"><a id="L84">84</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless copy($f-&gt;stringify, $target_string)</td></tr>
+<tr><td class="h"><a id="L123">123</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($this_total == $prev_total) { }</td></tr>
+<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($this_total &gt; $prev_total) { }</td></tr>
+<tr><td class="h"><a id="L142">142</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless (-e $self-&gt;to-&gt;file(&#39;cover.css&#39;))</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">unless copy($self-&gt;from-&gt;file(&#39;cover.css&#39;), $self-&gt;to-&gt;file(&#39;cover.css&#39;))</td></tr>
+</table>
+</body>
+</html>
View
32 t/testdata/run_1/lib-App-ArchiveDevelCover-pm--condition.html
@@ -0,0 +1,32 @@
+<!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 0.79
+Devel::Cover is copyright 2001-2011, Paul Johnson (pjcj@cpan.org)
+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>Condition Coverage: lib/App/ArchiveDevelCover.pm</title>
+</head>
+<body>
+<h1>Condition Coverage</h1>
+<table>
+<tr><td class="h" align="right">File:</td><td align="left">lib/App/ArchiveDevelCover.pm</td></tr>
+<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">0.0%</td></tr>
+</table>
+<div><br/></div>
+<table>
+<tr><th>line</th><th>%</th><th>coverage</th><th>condition</th></tr>
+<tr><td class="h"><a id="L149">149</a></td><td class="c0">0</td><td><div><table><tr><th>A</th><th>B</th><th>dec</th></tr><tr align="center"><td class="c0">0</td><td class="c0">0</td><td class="c0">0</td></tr><tr align="center"><td class="c0">0</td><td class="c0">1</td><td class="c0">1</td></tr><tr align="center"><td class="c0">1</td><td class="c0">X</td><td class="c0">1</td></tr></table></div></td><td class="s">$self-&gt;archive_db-&gt;open(&#39;&gt;&gt;&#39;) || warn(&quot;Can&#39;t write archive.db: $!&quot;)</td></tr>
+<tr><td class="h"><a id="L156">156</a></td><td class="c0">0</td><td><div><table><tr><th>A</th><th>dec</th></tr><tr align="center"><td class="c0">0</td><td class="c0">0</td></tr><tr align="center"><td class="c0">1</td><td class="c0">1</td></tr></table></div></td><td class="s">$self-&gt;project || &#39;unnamed project&#39;</td></tr>
+</table>
+</body>
+</html>
View
48 t/testdata/run_1/lib-App-ArchiveDevelCover-pm--subroutine.html
@@ -0,0 +1,48 @@
+<!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 0.79
+Devel::Cover is copyright 2001-2011, Paul Johnson (pjcj@cpan.org)
+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>Subroutine Coverage: lib/App/ArchiveDevelCover.pm</title>
+</head>
+<body>
+<h1>Subroutine Coverage</h1>
+<table>
+<tr><td class="h" align="right">File:</td><td align="left">lib/App/ArchiveDevelCover.pm</td></tr>
+<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">38.9%</td></tr>
+</table>
+<div><br/></div>
+<table>
+<tr><th>line</th><th>subroutine</th></tr>
+<tr><td class="h"><a id="L2">2</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L3">3</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L4">4</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L5">5</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L6">6</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L7">7</a></td><td class="c3"><div class="s">BEGIN</div></td></tr>
+<tr><td class="h"><a id="L18">18</a></td><td class="c0"><div class="s">_build_coverage_html</div></td></tr>
+<tr><td class="h"><a id="L29">29</a></td><td class="c0"><div class="s">_build_runtime</div></td></tr>
+<tr><td class="h"><a id="L34">34</a></td><td class="c0"><div class="s">_build_archive_html</div></td></tr>
+<tr><td class="h"><a id="L45">45</a></td><td class="c0"><div class="s">_build_archive_db</div></td></tr>
+<tr><td class="h"><a id="L50">50</a></td><td class="c0"><div class="s">_build_previous_stats</div></td></tr>
+<tr><td class="h"><a id="L63">63</a></td><td class="c0"><div class="s">run</div></td></tr>
+<tr><td class="h"><a id="L69">69</a></td><td class="c0"><div class="s">archive</div></td></tr>
+<tr><td class="h"><a id="L91">91</a></td><td class="c0"><div class="s">update_index</div></td></tr>
+<tr><td class="h"><a id="L103">103</a></td><td class="c0"><div class="s">update_archive_html</div></td></tr>
+<tr><td class="h"><a id="L148">148</a></td><td class="c0"><div class="s">update_archive_db</div></td></tr>
+<tr><td class="h"><a id="L155">155</a></td><td class="c0"><div class="s">_archive_template</div></td></tr>
+</table>
+</body>
+</html>
View
192 t/testdata/run_1/lib-App-ArchiveDevelCover-pm.html
@@ -0,0 +1,192 @@
+<!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 0.79
+Devel::Cover is copyright 2001-2011, Paul Johnson (pjcj@cpan.org)
+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>File Coverage: lib/App/ArchiveDevelCover.pm</title>
+</head>
+<body>
+<h1>File Coverage</h1>
+<table>
+<tr><td class="h" align="right">File:</td><td align="left">lib/App/ArchiveDevelCover.pm</td></tr>
+<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">18.5%</td></tr>
+</table>
+<div><br/></div>
+<table>
+<tr><th>line</th><th>stmt</th><th>bran</th><th>cond</th><th>sub</th><th>time</th><th>code</th></tr>
+<tr><td class="h">1</td><td></td><td></td><td></td><td></td><td></td><td class="s">package App::ArchiveDevelCover;</td></tr>
+<tr><td class="h">2</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L2">1</a></div><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L2">1</a></div></td><td><div>65861</div><div>5</div><div>33</div><div>5</div><div>3</div><div>77</div></td><td class="s">use 5.010;</td></tr>
+<tr><td class="h">3</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L3">1</a></div></td><td><div>472</div><div>391002</div><div>12</div></td><td class="s">use Moose;</td></tr>
+<tr><td class="h">4</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L4">1</a></div></td><td><div>42126</div><div>352675</div><div>23</div></td><td class="s">use MooseX::Types::Path::Class;</td></tr>
+<tr><td class="h">5</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L5">1</a></div></td><td><div>1208</div><div>211378</div><div>23</div></td><td class="s">use DateTime;</td></tr>
+<tr><td class="h">6</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L6">1</a></div></td><td><div>5703</div><div>1806</div><div>49</div></td><td class="s">use File::Copy;</td></tr>
+<tr><td class="h">7</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L7">1</a></div></td><td><div>12219</div><div>17043</div><div>9</div></td><td class="s">use HTML::TableExtract;</td></tr>
+<tr><td class="h">8</td><td colspan="6"></td></tr><tr><td class="h">9</td><td></td><td></td><td></td><td></td><td></td><td class="s"># ABSTRACT: Archive Devel::Cover reports</td></tr>
+<tr><td class="h">10</td><td></td><td></td><td></td><td></td><td></td><td class="s">our $VERSION = &#39;1.000&#39;;</td></tr>
+<tr><td class="h">11</td><td colspan="6"></td></tr><tr><td class="h">12</td><td></td><td></td><td></td><td></td><td></td><td class="s">with &#39;MooseX::Getopt&#39;;</td></tr>
+<tr><td class="h">13</td><td colspan="6"></td></tr><tr><td class="h">14</td><td></td><td></td><td></td><td></td><td></td><td class="s">has [qw(from to)] =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;Path::Class::Dir&#39;,coerce=&gt;1,required=&gt;1,);</td></tr>
+<tr><td class="h">15</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;project&#39; =&gt; (is =&gt; &#39;ro&#39;, isa=&gt;&#39;Str&#39;);</td></tr>
+<tr><td class="h">16</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;coverage_html&#39; =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;Path::Class::File&#39;,lazy_build=&gt;1,traits=&gt; [&#39;NoGetopt&#39;]);</td></tr>
+<tr><td class="h">17</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _build_coverage_html {</td></tr>
+<tr><td class="h">18</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L18">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">19</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L19">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;if (-e $self-&gt;from-&gt;file(&#39;coverage.html&#39;)) {</td></tr>
+<tr><td class="h">20</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return $self-&gt;from-&gt;file(&#39;coverage.html&#39;);</td></tr>
+<tr><td class="h">21</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">22</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;else {</td></tr>
+<tr><td class="h">23</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;say &quot;Cannot find &#39;coverage.html&#39; in &quot;.$self-&gt;from.&#39;. Aborting&#39;;</td></tr>
+<tr><td class="h">24</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;exit;</td></tr>
+<tr><td class="h">25</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">26</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">27</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;runtime&#39; =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;DateTime&#39;,lazy_build=&gt;1,traits=&gt; [&#39;NoGetopt&#39;],);</td></tr>
+<tr><td class="h">28</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _build_runtime {</td></tr>
+<tr><td class="h">29</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L29">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">30</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;return DateTime-&gt;from_epoch(epoch=&gt;$self-&gt;coverage_html-&gt;stat-&gt;mtime);</td></tr>
+<tr><td class="h">31</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">32</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;archive_html&#39; =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;Path::Class::File&#39;,lazy_build=&gt;1,traits=&gt; [&#39;NoGetopt&#39;]);</td></tr>
+<tr><td class="h">33</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _build_archive_html {</td></tr>
+<tr><td class="h">34</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L34">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">35</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L35">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;unless (-e $self-&gt;to-&gt;file(&#39;index.html&#39;)) {</td></tr>
+<tr><td class="h">36</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my $tpl = $self-&gt;_archive_template;</td></tr>
+<tr><td class="h">37</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my $fh = $self-&gt;to-&gt;file(&#39;index.html&#39;)-&gt;openw;</td></tr>
+<tr><td class="h">38</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;print $fh $tpl;</td></tr>
+<tr><td class="h">39</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;close $fh;</td></tr>
+<tr><td class="h">40</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">41</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;return $self-&gt;to-&gt;file(&#39;index.html&#39;);</td></tr>
+<tr><td class="h">42</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">43</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;archive_db&#39; =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;Path::Class::File&#39;,lazy_build=&gt;1,traits=&gt; [&#39;NoGetopt&#39;]);</td></tr>
+<tr><td class="h">44</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _build_archive_db {</td></tr>
+<tr><td class="h">45</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L45">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">46</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;return $self-&gt;to-&gt;file(&#39;archive_db&#39;);</td></tr>
+<tr><td class="h">47</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">48</td><td></td><td></td><td></td><td></td><td></td><td class="s">has &#39;previous_stats&#39; =&gt; (is=&gt;&#39;ro&#39;,isa=&gt;&#39;ArrayRef&#39;,lazy_build=&gt;1,traits=&gt;[&#39;NoGetopt&#39;]);</td></tr>
+<tr><td class="h">49</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _build_previous_stats {</td></tr>
+<tr><td class="h">50</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L50">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">51</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L51">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;if (-e $self-&gt;archive_db) {</td></tr>
+<tr><td class="h">52</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my $dbr = $self-&gt;archive_db-&gt;openr;</td></tr>
+<tr><td class="h">53</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my @data = &lt;$dbr&gt;; # probably better to just get last line...</td></tr>
+<tr><td class="h">54</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my @prev = split(/;/,$data[-1]);</td></tr>
+<tr><td class="h">55</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return \@prev;</td></tr>
+<tr><td class="h">56</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">57</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;else {</td></tr>
+<tr><td class="h">58</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return [undef,0,0,0];</td></tr>
+<tr><td class="h">59</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">60</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">61</td><td colspan="6"></td></tr><tr><td class="h">62</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub run {</td></tr>
+<tr><td class="h">63</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L63">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">64</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$self-&gt;archive;</td></tr>
+<tr><td class="h">65</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$self-&gt;update_index;</td></tr>
+<tr><td class="h">66</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">67</td><td colspan="6"></td></tr><tr><td class="h">68</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub archive {</td></tr>
+<tr><td class="h">69</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L69">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">70</td><td colspan="6"></td></tr><tr><td class="h">71</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $from = $self-&gt;from;</td></tr>
+<tr><td class="h">72</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $target = $self-&gt;to-&gt;subdir($self-&gt;runtime-&gt;iso8601);</td></tr>
+<tr><td class="h">73</td><td colspan="6"></td></tr><tr><td class="h">74</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L74">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;if (-e $target) {</td></tr>
+<tr><td class="h">75</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;say &quot;This coverage report has already been archived.&quot;;</td></tr>
+<tr><td class="h">76</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;exit;</td></tr>
+<tr><td class="h">77</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">78</td><td colspan="6"></td></tr><tr><td class="h">79</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$target-&gt;mkpath;</td></tr>
+<tr><td class="h">80</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $target_string = $target-&gt;stringify;</td></tr>
+<tr><td class="h">81</td><td colspan="6"></td></tr><tr><td class="h">82</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;while (my $f = $from-&gt;next) {</td></tr>
+<tr><td class="h">83</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L83">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;next unless $f=~/\.(html|css)$/;</td></tr>
+<tr><td class="h">84</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L84">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;copy($f-&gt;stringify,$target_string) || die &quot;Cannot copy $from to $target_string: $!&quot;;</td></tr>
+<tr><td class="h">85</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">86</td><td colspan="6"></td></tr><tr><td class="h">87</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;say &quot;archived coverage reports at $target_string&quot;;</td></tr>
+<tr><td class="h">88</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">89</td><td colspan="6"></td></tr><tr><td class="h">90</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub update_index {</td></tr>
+<tr><td class="h">91</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L91">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">92</td><td colspan="6"></td></tr><tr><td class="h">93</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $te = HTML::TableExtract-&gt;new( headers =&gt; [qw(stm sub total)] );</td></tr>
+<tr><td class="h">94</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$te-&gt;parse(scalar $self-&gt;coverage_html-&gt;slurp);</td></tr>
+<tr><td class="h">95</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $rows =$te-&gt;rows;</td></tr>
+<tr><td class="h">96</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $last_row = $rows-&gt;[-1];</td></tr>
+<tr><td class="h">97</td><td colspan="6"></td></tr><tr><td class="h">98</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$self-&gt;update_archive_html($last_row);</td></tr>
+<tr><td class="h">99</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$self-&gt;update_archive_db($last_row);</td></tr>
+<tr><td class="h">100</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">101</td><td colspan="6"></td></tr><tr><td class="h">102</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub update_archive_html {</td></tr>
+<tr><td class="h">103</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L103">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my ($self, $last_row) = @_;</td></tr>
+<tr><td class="h">104</td><td colspan="6"></td></tr><tr><td class="h">105</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $prev_stats = $self-&gt;previous_stats;</td></tr>
+<tr><td class="h">106</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $runtime = $self-&gt;runtime;</td></tr>
+<tr><td class="h">107</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $date = $runtime-&gt;ymd(&#39;-&#39;).&#39; &#39;.$runtime-&gt;hms;</td></tr>
+<tr><td class="h">108</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $link = $runtime-&gt;iso8601.&quot;/coverage.html&quot;;</td></tr>
+<tr><td class="h">109</td><td colspan="6"></td></tr><tr><td class="h">110</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $new_stat = qq{\n&lt;tr&gt;&lt;td&gt;&lt;a href=&quot;$link&quot;&gt;$date&lt;/a&gt;&lt;/td&gt;};</td></tr>
+<tr><td class="h">111</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;foreach my $val (@$last_row) {</td></tr>
+<tr><td class="h">112</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;my $style;</td></tr>
+<tr><td class="h">113</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;given ($val) {</td></tr>
+<tr><td class="h">114</td><td><div class="c0">0</div><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;when ($_ &lt; 75) { $style = &#39;c0&#39; }</td></tr>
+<tr><td class="h">115</td><td><div class="c0">0</div><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;when ($_ &lt; 90) { $style = &#39;c1&#39; }</td></tr>
+<tr><td class="h">116</td><td><div class="c0">0</div><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;when ($_ &lt; 100) { $style = &#39;c2&#39; }</td></tr>
+<tr><td class="h">117</td><td><div class="c0">0</div><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;when ($_ &gt;= 100) { $style = &#39;c3&#39; }</td></tr>
+<tr><td class="h">118</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">119</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$new_stat.=qq{&lt;td class=&quot;$style&quot;&gt;$val&lt;/td&gt;};</td></tr>
+<tr><td class="h">120</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">121</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $prev_total = $prev_stats-&gt;[3];</td></tr>
+<tr><td class="h">122</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $this_total = $last_row-&gt;[-1];</td></tr>
+<tr><td class="h">123</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L123">0</a></div><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L123">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;if ($this_total == $prev_total) {</td></tr>
+<tr><td class="h">124</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$new_stat.=qq{&lt;td class=&quot;c3&quot;&gt;=&lt;/td&gt;};</td></tr>
+<tr><td class="h">125</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">126</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;elsif ($this_total &gt; $prev_total) {</td></tr>
+<tr><td class="h">127</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$new_stat.=qq{&lt;td class=&quot;c3&quot;&gt;+&lt;/td&gt;};</td></tr>
+<tr><td class="h">128</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">129</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;else {</td></tr>
+<tr><td class="h">130</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$new_stat.=qq{&lt;td class=&quot;c0&quot;&gt;-&lt;/td&gt;};</td></tr>
+<tr><td class="h">131</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">132</td><td colspan="6"></td></tr><tr><td class="h">133</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$new_stat.=&quot;&lt;/tr&gt;\n&quot;;</td></tr>
+<tr><td class="h">134</td><td colspan="6"></td></tr><tr><td class="h">135</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $archive = $self-&gt;archive_html-&gt;slurp;</td></tr>
+<tr><td class="h">136</td><td><div class="c0">0</div><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;$archive =~ s/(&lt;!-- INSERT --&gt;)/$1 . $new_stat/e;</td></tr>
+<tr><td class="h">137</td><td colspan="6"></td></tr><tr><td class="h">138</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $fh = $self-&gt;archive_html-&gt;openw;</td></tr>
+<tr><td class="h">139</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;print $fh $archive;</td></tr>
+<tr><td class="h">140</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;close $fh;</td></tr>
+<tr><td class="h">141</td><td colspan="6"></td></tr><tr><td class="h">142</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L142">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;unless (-e $self-&gt;to-&gt;file(&#39;cover.css&#39;)) {</td></tr>
+<tr><td class="h">143</td><td><div class="c0">0</div></td><td><div class="c0" title="-/-"><a href="lib-App-ArchiveDevelCover-pm--branch.html#L143">0</a></div></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;copy($self-&gt;from-&gt;file(&#39;cover.css&#39;),$self-&gt;to-&gt;file(&#39;cover.css&#39;)) || warn &quot;Cannot copy cover.css: $!&quot;;</td></tr>
+<tr><td class="h">144</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;}</td></tr>
+<tr><td class="h">145</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">146</td><td colspan="6"></td></tr><tr><td class="h">147</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub update_archive_db {</td></tr>
+<tr><td class="h">148</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L148">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my ($self, $last_row) = @_;</td></tr>
+<tr><td class="h">149</td><td><div class="c0">0</div></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--condition.html#L149">0</a></div></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $dbw = $self-&gt;archive_db-&gt;open(&quot;&gt;&gt;&quot;) || warn &quot;Can&#39;t write archive.db: $!&quot;;</td></tr>
+<tr><td class="h">150</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;say $dbw join(&#39;;&#39;,$self-&gt;runtime-&gt;iso8601,@$last_row);</td></tr>
+<tr><td class="h">151</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;close $dbw;</td></tr>
+<tr><td class="h">152</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">153</td><td colspan="6"></td></tr><tr><td class="h">154</td><td></td><td></td><td></td><td></td><td></td><td class="s">sub _archive_template {</td></tr>
+<tr><td class="h">155</td><td><div class="c0">0</div></td><td></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--subroutine.html#L155">0</a></div></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $self = shift;</td></tr>
+<tr><td class="h">156</td><td><div class="c0">0</div></td><td></td><td><div class="c0"><a href="lib-App-ArchiveDevelCover-pm--condition.html#L156">0</a></div></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $name = $self-&gt;project || &#39;unnamed project&#39;;</td></tr>
+<tr><td class="h">157</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $class = ref($self);</td></tr>
+<tr><td class="h">158</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;my $version = $class-&gt;VERSION;</td></tr>
+<tr><td class="h">159</td><td><div class="c0">0</div></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;return &lt;&lt;&quot;EOTMPL&quot;;</td></tr>
+<tr><td class="h">160</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;!DOCTYPE html</td></tr>
+<tr><td class="h">161</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PUBLIC &quot;-//W3C//DTD XHTML 1.0 Transitional//EN&quot;</td></tr>
+<tr><td class="h">162</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&quot;http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd&quot;&gt;</td></tr>
+<tr><td class="h">163</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;html xmlns=&quot;http://www.w3.org/1999/xhtml&quot;&gt;</td></tr>
+<tr><td class="h">164</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;!-- This file was generated by $class version $version --&gt;</td></tr>
+<tr><td class="h">165</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;head&gt;</td></tr>
+<tr><td class="h">166</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&lt;meta http-equiv=&quot;Content-Type&quot; content=&quot;text/html; charset=utf-8&quot;&gt;&lt;/meta&gt;</td></tr>
+<tr><td class="h">167</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&lt;meta http-equiv=&quot;Content-Language&quot; content=&quot;en-us&quot;&gt;&lt;/meta&gt;</td></tr>
+<tr><td class="h">168</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&lt;link rel=&quot;stylesheet&quot; type=&quot;text/css&quot; href=&quot;cover.css&quot;&gt;&lt;/link&gt;</td></tr>
+<tr><td class="h">169</td><td></td><td></td><td></td><td></td><td></td><td class="s">&nbsp;&nbsp;&nbsp;&nbsp;&lt;title&gt;Test Coverage Archive for $name&lt;/title&gt;</td></tr>
+<tr><td class="h">170</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;/head&gt;</td></tr>
+<tr><td class="h">171</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;body&gt;</td></tr>
+<tr><td class="h">172</td><td colspan="6"></td></tr><tr><td class="h">173</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;body&gt;</td></tr>
+<tr><td class="h">174</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;h1&gt;Test Coverage Archive for $name&lt;/h1&gt;</td></tr>
+<tr><td class="h">175</td><td colspan="6"></td></tr><tr><td class="h">176</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;table&gt;</td></tr>
+<tr><td class="h">177</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;tr&gt;&lt;th&gt;Coverage Report&lt;/th&gt;&lt;th&gt;stmt&lt;/th&gt;&lt;th&gt;sub&lt;/th&gt;&lt;th&gt;total&lt;/th&gt;&lt;th&gt;Trend&lt;/th&gt;&lt;/tr&gt;</td></tr>
+<tr><td class="h">178</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;!-- INSERT --&gt;</td></tr>
+<tr><td class="h">179</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;/table&gt;</td></tr>
+<tr><td class="h">180</td><td colspan="6"></td></tr><tr><td class="h">181</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;p&gt;Generated by &lt;a href=&quot;http://metacpan.org/module/$class&quot;&gt;$class&lt;/a&gt; version $version.&lt;/p&gt;</td></tr>
+<tr><td class="h">182</td><td colspan="6"></td></tr><tr><td class="h">183</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;/body&gt;</td></tr>
+<tr><td class="h">184</td><td></td><td></td><td></td><td></td><td></td><td class="s">&lt;/html&gt;</td></tr>
+<tr><td class="h">185</td><td></td><td></td><td></td><td></td><td></td><td class="s">EOTMPL</td></tr>
+<tr><td class="h">186</td><td></td><td></td><td></td><td></td><td></td><td class="s">}</td></tr>
+<tr><td class="h">187</td><td colspan="6"></td></tr><tr><td class="h">188</td><td></td><td></td><td></td><td></td><td></td><td class="s">__PACKAGE__-&gt;meta-&gt;make_immutable;</td></tr>
+<tr><td class="h">189</td><td></td><td></td><td></td><td></td><td></td><td class="s">1;</td></tr>
+<tr><td class="h">190</td><td colspan="6"></td></tr></table>
+</body>
+</html>
View
1  t/testdata/run_1/structure/608646b117bab1d83fbd282de2cf53e0
@@ -0,0 +1 @@
+{"pod":[[63,"run"],[69,"archive"],[91,"update_index"],[103,"update_archive_html"],[148,"update_archive_db"]],"statement":[2,2,2,2,2,2,3,3,3,4,4,4,5,5,5,6,6,6,7,7,7,18,19,20,23,24,29,30,34,35,36,37,38,39,41,45,46,50,51,52,53,54,55,58,63,64,65,69,71,72,74,75,76,79,80,82,83,84,87,91,93,94,95,96,98,99,103,105,106,107,108,110,111,112,113,114,114,115,115,116,116,117,117,119,121,122,123,124,127,130,133,135,136,136,138,139,140,142,143,148,149,150,151,155,156,157,158,159],"subroutine":[[2,"BEGIN"],[2,"BEGIN"],[3,"BEGIN"],[4,"BEGIN"],[5,"BEGIN"],[6,"BEGIN"],[7,"BEGIN"],[18,"_build_coverage_html"],[29,"_build_runtime"],[34,"_build_archive_html"],[45,"_build_archive_db"],[50,"_build_previous_stats"],[63,"run"],[69,"archive"],[91,"update_index"],[103,"update_archive_html"],[148,"update_archive_db"],[155,"_archive_template"]],"file":"lib/App/ArchiveDevelCover.pm","digest":"608646b117bab1d83fbd282de2cf53e0","branch":[[19,{"text":"if (-e $self->from->file('coverage.html')) { }"}],[35,{"text":"unless (-e $self->to->file('index.html'))"}],[51,{"text":"if (-e $self->archive_db) { }"}],[74,{"text":"if (-e $target)"}],[83,{"text":"unless $f =~ /\\.(html|css)$/"}],[84,{"text":"unless copy($f->stringify, $target_string)"}],[123,{"text":"if ($this_total == $prev_total) { }"}],[123,{"text":"elsif ($this_total > $prev_total) { }"}],[143,{"text":"unless copy($self->from->file('cover.css'), $self->to->file('cover.css'))"}],[142,{"text":"unless (-e $self->to->file('cover.css'))"}]],"condition":[[149,{"left":"$self->archive_db->open('>>')","right":"warn(\"Can't write archive.db: $!\")","type":"or_3","op":"||"}],[156,{"left":"$self->project","right":"'unnamed project'","type":"or_2","op":"||"}]],"start":{"155":{"_archive_template":[{"pod":5,"statement":103,"subroutine":17,"time":null,"branch":10,"condition":1}]},"63":{"run":[{"pod":null,"statement":44,"subroutine":12,"time":null,"branch":3,"condition":null}]},"7":{"BEGIN":[{"pod":null,"statement":18,"subroutine":6,"time":null,"branch":null,"condition":null}]},"91":{"update_index":[{"pod":2,"statement":59,"subroutine":14,"time":null,"branch":6,"condition":null}]},"2":{"BEGIN":[{"pod":null,"statement":null,"subroutine":null,"time":null,"branch":null,"condition":null},{"pod":null,"statement":3,"subroutine":1,"time":null,"branch":null,"condition":null}]},"18":{"_build_coverage_html":[{"pod":null,"statement":21,"subroutine":7,"time":null,"branch":null,"condition":null}]},"29":{"_build_runtime":[{"pod":null,"statement":26,"subroutine":8,"time":null,"branch":1,"condition":null}]},"6":{"BEGIN":[{"pod":null,"statement":15,"subroutine":5,"time":null,"branch":null,"condition":null}]},"50":{"_build_previous_stats":[{"pod":null,"statement":37,"subroutine":11,"time":null,"branch":2,"condition":null}]},"3":{"BEGIN":[{"pod":null,"statement":6,"subroutine":2,"time":null,"branch":null,"condition":null}]},"69":{"archive":[{"pod":1,"statement":47,"subroutine":13,"time":null,"branch":3,"condition":null}]},"4":{"BEGIN":[{"pod":null,"statement":9,"subroutine":3,"time":null,"branch":null,"condition":null}]},"103":{"update_archive_html":[{"pod":3,"statement":66,"subroutine":15,"time":null,"branch":6,"condition":null}]},"34":{"_build_archive_html":[{"pod":null,"statement":28,"subroutine":9,"time":null,"branch":1,"condition":null}]},"45":{"_build_archive_db":[{"pod":null,"statement":35,"subroutine":10,"time":null,"branch":2,"condition":null}]},"148":{"update_archive_db":[{"pod":4,"statement":99,"subroutine":16,"time":null,"branch":10,"condition":null}]},"5":{"BEGIN":[{"pod":null,"statement":12,"subroutine":4,"time":null,"branch":null,"condition":null}]},"-1":{"__COVER__":[{"pod":5,"statement":108,"subroutine":18,"time":null,"branch":10,"condition":2}]}}}
View
22 t/testdata/setup.pm
@@ -0,0 +1,22 @@
+package testdata::setup;
+use strict;
+use warnings;
+use 5.010;
+
+use File::Temp qw(tempdir);
+use Path::Class;
+use File::Copy::Recursive qw(dircopy);
+
+sub tmpdir {
+ my $tempdir = Path::Class::Dir->new(tempdir(CLEANUP=>$ENV{NO_CLEANUP} ? 0 : 1));
+ return $tempdir;
+}
+
+sub run {
+ my ($tempdir, $run) = @_;
+
+ dircopy(Path::Class::dir(qw(t testdata), $run),$tempdir->subdir($run)) || die $!;
+ return $tempdir->subdir($run);
+}
+
+1;
Please sign in to comment.
Something went wrong with that request. Please try again.