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   20 use strict;
  4         6  
  4         88  
4 4     4   16 use warnings;
  4         7  
  4         274  
5              
6             sub get_module {
7 7     7 0 29 my ($name) = @_;
8              
9 7 100       28 if (index($name, '::') != -1) {
10 5         15 return $name;
11             }
12              
13 2         6 return "Net::WebSocket::Frame::$name";
14             }
15              
16             1;