NAME

TooMuchCode::ProhibitLargeBlock -- Find oversized blocks

DESCRIPTION

This policy scan for large code blocks of the following type.

map { ... };
grep { ... };
do { ... };

By default a large block is one with more than 10 statements. If you need another limit, you can set the parameter block_statement_count_limit.

For example in the .perlcriticrc file

[TooMuchCode::ProhibitLargeBlock]
block_statement_count_limit = 20