[Rio-pm] Perl Critic + Modern::Perl

[Tiago Peczenyj]

Tenho o seguinte arquivo:

$ cat a.pl
use Modern::Perl;

say "oie";

Mas se eu rodar o perl critic

$ perlcritic -4 a.pl
Code not contained in explicit package at line 1, column 1.  Violates
encapsulation.  (Severity: 4)
Module does not end with "1;" at line 3, column 1.  Must end with a
recognizable true value.  (Severity: 4)
Code before strictures are enabled at line 3, column 1.  See page 429
of PBP.  (Severity: 5)
Code before warnings are enabled at line 3, column 1.  See page 431 of
PBP.  (Severity: 4)

Acho estranho ele reclamar de strictures e warnings se o Modern::Perl
ja faz isso. comofas/

Outra coisa: mesmo que eu queira criar um script standalone é
recomendado fazer isto?

package main;

use Modern::Perl;

say "oie";

1;

Eu imagino que eu estivesse em uma estrutura com varios arquivos isso
faça sentido mas em algo pequeno ainda assim é recomendado?

Att

Pacman

-- 
Tiago B. Peczenyj
Linux User #405772

http://pacman.blog.br