File Coverage

blib/lib/OpenTracing/Implementation/NoOp/Tracer.pm
Criterion Covered Total %
statement 13 19 68.4
branch 1 2 50.0
condition n/a
subroutine 5 12 41.6
pod 0 7 0.0
total 19 40 47.5


line stmt bran cond sub pod time code
1             package OpenTracing::Implementation::NoOp::Tracer;
2              
3             =head1 NAME
4              
5             OpenTracing::Implementation::NoOp::Tracer - NoOp, so code won't break!
6              
7             =head1 DESCRIPTION
8              
9             Objects of this class implement the required methods of the
10             L<OpenTracing::Interface::Tracer>, to be compliant during testing and allow
11             applications to continue working without having to catch exceptions all the
12             time.
13              
14             None of the methods will do anything useful.
15              
16             =cut
17              
18             our $VERSION = 'v0.72.0';
19              
20              
21              
22 2     2   310018 use OpenTracing::Implementation::NoOp::Scope;
  2         5  
  2         55  
23 2     2   796 use OpenTracing::Implementation::NoOp::ScopeManager;
  2         5  
  2         69  
24 2     2   12 use OpenTracing::Implementation::NoOp::Span;
  2         3  
  2         267  
25              
26              
27 0     0 0   sub new { bless {} }
28              
29              
30             sub get_scope_manager {
31 0     0 0   OpenTracing::Implementation::NoOp::ScopeManager->new( )
32             }
33              
34             sub get_active_span {
35 0     0 0   OpenTracing::Implementation::NoOp::Span->new( )
36             }
37              
38             sub start_active_span {
39 0     0 0   OpenTracing::Implementation::NoOp::Scope->new( )
40             }
41              
42             sub start_span {
43 0     0 0   OpenTracing::Implementation::NoOp::Span->new( )
44             }
45              
46       0 0   sub inject_context { }
47              
48 0     0 0   sub extract_context { undef }
49              
50              
51              
52             BEGIN {
53 2     2   13 use Role::Tiny::With;
  2         5  
  2         91  
54             with 'OpenTracing::Interface::Tracer'
55 2 50   2   68 if $ENV{OPENTRACING_INTERFACE};
56             } # check at compile time, perl -c will work
57              
58              
59              
60             1;