File Coverage

blib/lib/IO/Framed/X/EmptyWrite.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package IO::Framed::X::EmptyWrite;
2              
3             =encoding utf-8
4              
5             =head1 NAME
6              
7             IO::Framed::X::EmptyWrite
8              
9             =head1 SYNOPSIS
10              
11             use Try::Tiny;
12             use IO::Framed::Write;
13              
14             my $iof = IO::Framed::Write->new( $some_socket );
15              
16             try { $iof->write(q<>) }
17             catch {
18             if ( try { $_->isa('IO::Framed::Read') } ) { ... }
19             };
20              
21             =head1 DESCRIPTION
22              
23             Thrown when empty string or undef is given to C.
24              
25             =cut
26              
27 1     1   645 use strict;
  1         2  
  1         29  
28 1     1   5 use warnings;
  1         2  
  1         32  
29              
30 1     1   5 use parent qw( IO::Framed::X::Base );
  1         3  
  1         6  
31              
32             1;