/ 
Perl-Critic-Tics-0.010
River stage one • 3 direct dependents • 7 total dependents
/ Perl::Critic::Policy::Tics::ProhibitManyArrows

NAME

Perl::Critic::Policy::Tics::ProhibitManyArrows - (this => is => not => good)

VERSION

version 0.010

DESCRIPTION

You are not clever if you do this:

my %hash = (key1=>value1=>key2=>value2=>key3=>'value3');

You are even more not clever if you do this:

my %hash = (key1=>value1=>key2=>value2=>key3=>value3=>);

PERL VERSION

This library should run on perls released even a long time ago. It should work on any version of perl released in the last five years.

Although it may work on older versions of perl, no guarantee is made that the minimum required version will not be increased. The version may be increased for any reason, and there is no promise that patches will be accepted to lower the minimum required perl.

CONFIGURATION

There is one parameter for this policy, max_allowed, which specifies the maximum number of fat arrows that may appear as item separators. The default is two. If you really hate the fat arrow, and never want to see it, you can set max_allowed to zero and make any occurance of => illegal.

Here are some examples of code that would fail with various max_allowed values:

max_allowed    failing code
0              (foo => bar)
1              (foo => bar => baz)
2              (foo => bar => baz => quux)

AUTHOR

Ricardo SIGNES <cpan@semiotic.systems>

COPYRIGHT AND LICENSE

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.