File Coverage

blib/lib/HTTP/Engine/Role/ResponseWriter/WriteSTDOUT.pm
Criterion Covered Total %
statement 5 5 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod 0 1 0.0
total 7 8 87.5


line stmt bran cond sub pod time code
1             package HTTP::Engine::Role::ResponseWriter::WriteSTDOUT;
2 17     17   11628 use Any::Moose '::Role';
  17         44  
  17         116  
3              
4             sub write {
5 31     31 0 587 my($self, $buffer) = @_;
6 31         102 print STDOUT $buffer;
7             }
8              
9             1;