File Coverage

blib/lib/Net/WebSocket/FrameTypeName.pm
Criterion Covered Total %
statement 10 10 100.0
branch 2 2 100.0
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 15 16 93.7


line stmt bran cond sub pod time code
1             package Net::WebSocket::FrameTypeName;
2              
3 4     4   28 use strict;
  4         7  
  4         119  
4 4     4   20 use warnings;
  4         9  
  4         357  
5              
6             sub get_module {
7 7     7 0 21 my ($name) = @_;
8              
9 7 100       38 if (index($name, '::') != -1) {
10 5         19 return $name;
11             }
12              
13 2         8 return "Net::WebSocket::Frame::$name";
14             }
15              
16             1;