File Coverage

lib/Perlmazing/Perlmazing/Precompile/list_context.pm

Criterion	Covered	Total	%
statement	5	5	100.0
branch	2	2	100.0
condition			n/a
subroutine	2	2	100.0
pod			n/a
total	9	9	100.0

use Perlmazing;

sub main () {
	my @call = caller(1);
	$call[5] ? 1 : 0;
}