File Coverage

blib/lib/CPAN/Exception/yaml_not_installed.pm
Criterion Covered Total %
statement 9 13 69.2
branch n/a
condition n/a
subroutine 3 5 60.0
pod 0 2 0.0
total 12 20 60.0


line stmt bran cond sub pod time code
1             # -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*-
2             # vim: ts=4 sts=4 sw=4:
3             package CPAN::Exception::yaml_not_installed;
4 7     7   40 use strict;
  7         15  
  7         433  
5 7     7   37 use overload '""' => "as_string";
  7         14  
  7         48  
6              
7 7         1344 use vars qw(
8             $VERSION
9 7     7   428 );
  7         20  
10             $VERSION = "5.5";
11              
12              
13             sub new {
14 0     0 0   my($class,$module,$file,$during) = @_;
15 0           bless { module => $module, file => $file, during => $during }, $class;
16             }
17              
18             sub as_string {
19 0     0 0   my($self) = shift;
20 0           "'$self->{module}' not installed, cannot $self->{during} '$self->{file}'\n";
21             }
22              
23             1;