Не могу получить политику Perl::Critic::Policy::Tics::ProhibitLongLines для работы

Question

Я имею:

• Ubuntu 10.04
• Perlbrew 0,39
• Перешел на Perl 5.12.3. с perlbrew
• Установленный Perl::Critic и Perl::Critic::Tics с cpanm

мой файл.perlcriticrc:

severity = 1
only= 1

[CodeLayout::ProhibitHardTabs]
allow_leading_tabs = 0

[Perl::Critic::Policy::CodeLayout::RequireConsistentNewlines]

[Perl::Critic::Policy::Tics::ProhibitLongLines]
base_max = 120
hard_max = 130
pct_allowed = 5

[Perl::Critic::Policy::OTRS::RequireCamelCase]

Другие политики работают, как и ожидалось, но всякий раз, когда строка превышает длину, определенную hard_max, я получаю сообщение об ошибке:

Use of uninitialized value $min_width in numeric gt (>) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 51.
Use of uninitialized value $replength in numeric gt (>) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 51.
Use of uninitialized value $max_width in numeric gt (>) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 56.
Use of uninitialized value $replength in numeric gt (>) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 56.
Use of uninitialized value $replength in subtraction (-) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 67.
Use of uninitialized value $min_width in subtraction (-) at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 67.
Use of uninitialized value $replacement in concatenation (.) or string at /home/birdy/perl5/perlbrew/perls/perl-5.12.3/lib/site_perl/5.12.3/String/Format.pm line 67.

Спасибо за ваше время, и если вам нужна дополнительная информация, дайте мне знать.

Answer 1

Это похоже на ошибку для меня. Я получаю те же предупреждения, даже если полностью игнорирую .perlcriticrc файл:

perlcritic -1 --noprofile mycode.pl

Я на Perl 5.12.2.

Вы должны отправить сообщение об ошибке в Perl:: Critic:: Tics. Я проверил Changes файлы для обоих Tics и Perl:: Критик, но я не нашел ничего относящегося к String::Format, Убедитесь, что у вас есть последние версии Critic а также Tics, У меня есть ток Tics (0,006), но мой Critic немного устарела (1.111).