Не могу получить политику Perl :: Critic :: Policy :: Tics :: ProhibitLongLines для работы - PullRequest
3 голосов
/ 10 февраля 2012

У меня есть:

  • 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.

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

1 Ответ

1 голос
/ 10 февраля 2012

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

perlcritic -1 --noprofile mycode.pl

Я на Perl 5.12.2.

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

...