Branch Coverage

blib/lib/Linux/Statm/Tiny.pm.mite.pm

Criterion	Covered	Total	%
branch	145	338	42.9

line	true	false	branch
35	0	3	*{$_;}{'CODE'} ? :
39	0	3	*{$_;}{'CODE'} ? :
50	0	3	ref $_[0] ? :
53	0	3	@_ == 1 ? :
	0	3	$meta->{'HAS_BUILDARGS'} ? :
58	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $args->{'pid'}; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	3	if (exists $args->{'pid'})
62	0	3	unless $meta->{'BUILD'}
	0	3	if not $no_build and @{[] unless $meta->{'BUILD'};}
65	0	3	if @unknown
74	0	0	unless $meta->{'BUILD'}
82	3	0	defined ${^GLOBAL_PHASE} ? :
85	0	3	unless $meta->{'DEMOLISH'}
92	0	0	if $e
101	0	1	unless @_ == 1
102	0	24	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	22	2	exists $_[0]{'data'} ? :
110	0	1	unless @_ == 1
111	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'data_bytes'} ? :
115	0	1	unless @_ == 1
116	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'data_kb'} ? :
120	0	1	unless @_ == 1
121	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'data_mb'} ? :
125	0	1	unless @_ == 1
126	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'dt'} ? :
134	0	1	unless @_ == 1
135	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'dt_bytes'} ? :
139	0	1	unless @_ == 1
140	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'dt_kb'} ? :
144	0	1	unless @_ == 1
145	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'dt_mb'} ? :
149	0	1	unless @_ == 1
150	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'lib'} ? :
158	0	1	unless @_ == 1
159	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'lib_bytes'} ? :
163	0	1	unless @_ == 1
164	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'lib_kb'} ? :
168	0	1	unless @_ == 1
169	0	0	unless @_ == 1
	0	0	if defined $tmp and not ref $tmp
	0	0	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	0	exists $_[0]{'lib_mb'} ? :
173	0	3	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	1	2	exists $_[0]{'pid'} ? :
177	0	1	unless @_ == 1
178	0	46	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	44	2	exists $_[0]{'resident'} ? :
188	0	1	unless @_ == 1
189	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'resident_bytes'} ? :
197	0	1	unless @_ == 1
198	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'resident_kb'} ? :
206	0	1	unless @_ == 1
207	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'resident_mb'} ? :
215	0	1	unless @_ == 1
216	0	24	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	22	2	exists $_[0]{'share'} ? :
224	0	1	unless @_ == 1
225	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'share_bytes'} ? :
229	0	1	unless @_ == 1
230	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'share_kb'} ? :
234	0	1	unless @_ == 1
235	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'share_mb'} ? :
239	0	1	unless @_ == 1
240	0	46	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	44	2	exists $_[0]{'size'} ? :
250	0	1	unless @_ == 1
251	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'size_bytes'} ? :
259	0	1	unless @_ == 1
260	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'size_kb'} ? :
268	0	1	unless @_ == 1
269	0	4	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	2	2	exists $_[0]{'size_mb'} ? :
277	0	26	unless @_ == 1
	7	0	if defined $tmp and not ref $tmp
	0	7	unless do { my $tmp = $i; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	1	0	if (ref $default_value eq "ARRAY")
	0	1	unless do { package Linux::Statm::Tiny::Mite; if (ref $default_value eq "ARRAY") { my $ok = 1; foreach my $i (@{$default_value;}) { $ok = 0, last unless do { my $tmp = $i; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }; }; $ok; } }
	25	1	exists $_[0]{'statm'} ? :
282	0	1	unless @_ == 1
283	0	24	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	22	2	exists $_[0]{'text'} ? :
291	0	1	unless @_ == 1
292	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'text_bytes'} ? :
296	0	1	unless @_ == 1
297	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'text_kb'} ? :
301	0	1	unless @_ == 1
302	0	2	unless @_ == 1
	2	0	if defined $tmp and not ref $tmp
	0	2	unless do { my $tmp = $default_value; $tmp =~ /\A-?[0-9]+\z/ if defined $tmp and not ref $tmp }
	0	2	exists $_[0]{'text_mb'} ? :
309	0	24	if exists $DOES{$role}
310	0	24	if $role eq __PACKAGE__
311	0	24	if ($INC{'Moose/Util.pm'} and my $meta = Moose::Util::find_meta(ref $self || $self))
312	0	0	if $meta->can("does_role") and $meta->does_role($role)