The Perl Advent Calendar needs more articles for 2022. Submit your idea today!


Perl::Critic::Policy::Tics::ProhibitLongLines - 80 x 40 for life!


version 0.009


Please keep your code to about eighty columns wide, the One True Terminal Width. Going over that occasionally is okay, but only once in a while.

This policy always throws a violation for extremely long lines. It will also throw a violation if there are too many lines that are slightly longer than the preferred maximum length. If a only few lines exceed the preferred maximum width, they're let slide and only extremely long lines are violations.


There are three configuration options for this policy:

  base_max - the preferred maximum line length (default: 80)
  hard_max - the length beyond which a line is "extremely long"
             (default: base_max * 1.5)

  pct_allowed - the percentage of total lines which may fall between base_max
                and hard_max before those violations are reported (default: 1)


Ricardo SIGNES <>


This software is copyright (c) 2007 by Ricardo SIGNES.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.