Branch Coverage

blib/lib/App/MyPerl/Rewrite.pm

Criterion	Covered	Total	%
branch	2	6	33.3

line	true	false	branch
21	0	0	unless @ARGV
27	0	0	if ($self->_env_value('DEBUG'))
42	1	1	if ($data =~ s/\A(#!.*\n)//) { }