File Coverage

blib/lib/Gungho/Exception.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 13 13 100.0


line stmt bran cond sub pod time code
1             # $Id: /mirror/gungho/lib/Gungho/Exception.pm 1733 2007-05-15T02:45:51.609363Z lestrrat $
2             #
3             # Copyright (c) 2007 Daisuke Maki <daisuke@endeworks.jp>
4             # All rights reserved.
5              
6             package Gungho::Exception;
7 1     1   4 use strict;
  1         0  
  1         25  
8 1     1   3 use warnings;
  1         1  
  1         39  
9             use Exception::Class
10             'Gungho::Exception',
11             map {
12 1         1 ($_ => { isa => 'Gungho::Exception' })
  3         9  
13             } qw(
14             Gungho::Exception::RequestThrottled
15             Gungho::Exception::SendRequest::Handled
16             Gungho::Exception::HandleResponse::Handled
17             )
18 1     1   385 ;
  1         6679  
19              
20             1;
21              
22             __END__
23              
24             =head1 NAME
25              
26             Gungho::Exception - Gungho Exceptions
27              
28             =cut