[SP-pm] Variáveis Especiais
Nelson Ferraz
nferraz at gmail.com
Sun Oct 26 01:44:40 PDT 2008
Apenas para completar esta resposta, estive pesquisando no Perl Best
Practices e encontrei um exemplo...
## Code fragment (NOT RECOMMENDED) from Chapter 5 of "Perl Best Practices" ##
local $| = 1; # Autoflush output
local $" = qq{\0}; # Hash subscript separator
local $; = q{, }; # List separator
local $, = q{, }; # Output field separator
local $\ = qq{\n}; # Output record separator
O exemplo acima não é recomendado pois necessita de comentários para
explicar os nomes das variáveis -- o que, de acordo com qualquer
manual básico de programação, deveria ser claro desde o princípio.
## Code fragment (Recommended) from Chapter 5 of "Perl Best Practices" ##
use English qw( -no_match_vars );
local $OUTPUT_AUTOFLUSH = 1;
local $SUBSCRIPT_SEPARATOR = qq{\0};
local $LIST_SEPARATOR = q{, };
local $OUTPUT_FIELD_SEPARATOR = q{, };
local $OUTPUT_RECORD_SEPARATOR = qq{\n};
O exemplo acima é recomendado, pois os nomes das variáveis são claros;
se você quiser comentar cada linha, pode explicar o porquê de cada
valor, e não o significado de cada variável.
Pra quem ainda não leu o livro Perl Best Practices, ele é considerado
referência obrigatória em muitas empresas que trabalham com perl.
[]s
Nelson
More information about the SaoPaulo-pm
mailing list