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.71.1';
19              
20              
21              
22 2     2   302840 use OpenTracing::Implementation::NoOp::Scope;
  2         6  
  2         61  
23 2     2   926 use OpenTracing::Implementation::NoOp::ScopeManager;
  2         6  
  2         59  
24 2     2   14 use OpenTracing::Implementation::NoOp::Span;
  2         5  
  2         262  
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   15 use Role::Tiny::With;
  2         5  
  2         124  
54             with 'OpenTracing::Interface::Tracer'
55 2 50   2   57 if $ENV{OPENTRACING_INTERFACE};
56             } # check at compile time, perl -c will work
57              
58              
59              
60             1;