1Perl::Critic::Policy::TUiscesr::CPornPotehrriilbb:iu:ttCMeradintyPiAecrr:rl:oPwDosol(ci3uc)mye:n:tTaitciso:n:ProhibitManyArrows(3)
2
3
4
6 Perl::Critic::Policy::Tics::ProhibitManyArrows - (this => is => not =>
7 good)
8
10 version 0.010
11
13 You are not clever if you do this:
14
15 my %hash = (key1=>value1=>key2=>value2=>key3=>'value3');
16
17 You are even more not clever if you do this:
18
19 my %hash = (key1=>value1=>key2=>value2=>key3=>value3=>);
20
22 This library should run on perls released even a long time ago. It
23 should work on any version of perl released in the last five years.
24
25 Although it may work on older versions of perl, no guarantee is made
26 that the minimum required version will not be increased. The version
27 may be increased for any reason, and there is no promise that patches
28 will be accepted to lower the minimum required perl.
29
31 There is one parameter for this policy, max_allowed, which specifies
32 the maximum number of fat arrows that may appear as item separators.
33 The default is two. If you really hate the fat arrow, and never want
34 to see it, you can set max_allowed to zero and make any occurance of
35 "=>" illegal.
36
37 Here are some examples of code that would fail with various max_allowed
38 values:
39
40 max_allowed failing code
41 0 (foo => bar)
42 1 (foo => bar => baz)
43 2 (foo => bar => baz => quux)
44
46 Ricardo SIGNES <cpan@semiotic.systems>
47
49 This software is copyright (c) 2007 by Ricardo SIGNES.
50
51 This is free software; you can redistribute it and/or modify it under
52 the same terms as the Perl 5 programming language system itself.
53
54
55
56perl v5.38.0 Perl:2:0C2r3i-t0i7c-:2:1Policy::Tics::ProhibitManyArrows(3)