File Coverage

blib/lib/Net/CLI/Interact/Transport/Platform/Unix.pm
Criterion Covered Total %
statement 17 17 100.0
branch 1 2 50.0
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 25 27 92.5


line stmt bran cond sub pod time code
1             package Net::CLI::Interact::Transport::Platform::Unix;
2             { $Net::CLI::Interact::Transport::Platform::Unix::VERSION = '2.400000' }
3              
4 1     1   653 use Moo;
  1         2  
  1         7  
5 1     1   320 use Class::Load qw(try_load_class);
  1         2  
  1         124  
6              
7             BEGIN {
8 1     1 0 8 sub can_use_pty { return try_load_class('IO::Pty') }
9              
10 1 50   1   10 extends (can_use_pty()
11             ? 'Net::CLI::Interact::Transport::Wrapper::Net_Telnet'
12             : 'Net::CLI::Interact::Transport::Wrapper::IPC_Run');
13             }
14              
15             {
16             package # hide from pause
17             Net::CLI::Interact::Transport::Platform::Options;
18              
19 1     1   128 use Moo;
  1         8  
  1         5  
20 1     1   336 use Sub::Quote;
  1         2  
  1         101  
21 1     1   8 use MooX::Types::MooseLike::Base qw(Int);
  1         2  
  1         162  
22              
23             extends 'Net::CLI::Interact::Transport::Wrapper::Options';
24              
25             has 'reap' => (
26             is => 'rw',
27             isa => Int,
28             default => quote_sub('0'),
29             );
30             }
31              
32             1;