[SP-pm] O que vocês estão aprontando?

Alexei Znamensky russoz at gmail.com
Mon Aug 25 05:29:41 PDT 2008


Já deu uma olhada no Config::Any? Se não resolver seu problema, talvez seja
mais facilmente extensível para isso ;-)

2008/8/25 MrBiTS <mrbits em linuxmasters.info>

> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> >   E vocês? O que estão aprontando?
>
> 1) Algoritmos de análise combinatória para quebra de chaves de substituição
> baseadas em cifras de César;
>
> 2) Análise de dados não estruturados com informações de clientes, para
> alimentação de um banco de dados da empresa.
> Aqui tem umas coisas legais para se fazer. O arquivo vem num formato "mais
> ou menos parecido" com os arquivos .ini da vida. Então temos:
>
> [SECAO1]
> valor1;valor2;valor3
>
> [SECAO2]
> X:hostname1
> Y:hostname2
> Y:hostname3
> Z:hostname4
> Z:hostname1
>
> [SECAO4]
> hostname1: loren ipsum: 1234; dolor sit amet: 3254
> hostname2: loren ipsum: 1234; dolor sit amet: 3254
> hostname3: loren ipsum: 1234; dolor sit amet: 3254
> hostname4: loren ipsum: 1234; dolor sit amet: 3254
>
> [SECAO4]
> hostname1:4051
> hostname2:2018
> hostname2:2017
> hostname4:4049
>
> [SECAO5]
> hostname1:474536126
> hostname2:112596242
> hostname4:956629834
> hostname4:307409880
>
> [SECAO6]
> 2008-07^2155717824^62299078
>
> Com o arquivo "puro" não posso utilizar os métodos do Config::INI, que
> exige uma sintaxe mais rígida, assim:
>
> [secao]
> parametro=valor
>
> Esse cara está exigindo um pouco mais de trabalho mas, basicamente, basta
> descobrir o nome de cada seção e enviar os dados
> subsequentes a um parser específico. Nessas horas, sinto falta de uma
> estrutura case em Perl, que foi simulada por mim assim:
>
> my $caseS = "Perl"; # a variavel $caseS recebe um valor
> #
> if ( $caseS == "C++" ) {
>    print "sua escolha: $caseS";
> }
> elsif ( $caseS == "Java" ) {
>    print "sua escolha: $caseS";
> }
> elsif ( $caseS == "Perl" ) {
>    print "sua escolha: $caseS";
> }
> elsif ( $caseS == "PHP" ) {
>    print 'sua escolha: $caseS";
> }
> elsif ( $caseS == "TSE SAL" ) {
>    print "sua escolha: $caseS";
> }
> # default
> else {
>    print "Sua escolha $caseS nao e uma opcao valida";
> }
>
>
> 3 )Uma porrada de customizações de relatórios para clientes.
>
>
> - --
>
> Um abraço
>
> .0. MrBiTs - mrbits em linuxmasters.info
> ..0 GnuPG  -
> http://keys.cardboard.net:11371/pks/lookup?op=get&search=0xAC37715A6DD1F186
> 000 http://www.mrbits.com.br
>
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.4.6 (GNU/Linux)
>
> iD8DBQFIsoqdrDdxWm3R8YYRAgNOAJ9t75i2f+hU7LS0s//yVmPr4XyDagCfZSV4
> /h/rShL8U0JIoeW4t/OedCM=
> =j6xq
> -----END PGP SIGNATURE-----
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>



-- 
Alexei Znamensky [russoz_gmail_com] [russoz.wordpress.com] [
www.flickr.com/photos/alexeiz]
"Though we live in trying times, we're the ones who have to try"
-------------- Pr�xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20080825/b9b90e2d/attachment-0001.html>


More information about the SaoPaulo-pm mailing list