<table cellspacing="0" cellpadding="0" border="0" ><tr><td valign="top" style="font: inherit;"><DIV>Agradeço todas as dicas.</DIV>
<DIV>Vou colocar a mão na massa no final de semana.</DIV>
<DIV>&nbsp;</DIV>
<DIV>[]´s,</DIV>
<DIV>Juliana</DIV>
<DIV>&nbsp;</DIV>
<DIV><BR><BR>--- Em <B>qui, 22/10/09, Nelson Ferraz <I>&lt;nferraz@gmail.com&gt;</I></B> escreveu:<BR></DIV>
<BLOCKQUOTE style="BORDER-LEFT: rgb(16,16,255) 2px solid; PADDING-LEFT: 5px; MARGIN-LEFT: 5px"><BR>De: Nelson Ferraz &lt;nferraz@gmail.com&gt;<BR>Assunto: Re: [SP-pm] Enc: Re: Ajuda no módulo EndnoteStyle<BR>Para: saopaulo-pm@mail.pm.org<BR>Data: Quinta-feira, 22 de Outubro de 2009, 15:46<BR><BR>
<DIV class=plainMail>Parece bem simples. Dada uma string como essa:<BR><BR>my $sample = &lt;&lt;'ENDNOTE';<BR>%0 Journal Article<BR>%1 1294302<BR>%A Fabian M\&amp;\#246;rchen<BR>%T Unsupervised pattern mining from symbolic temporal data<BR>%J SIGKDD Explor. Newsl.<BR>%@ 1931-0145<BR>%V 9<BR>%N 1<BR>%P 41-55<BR>%D 2007<BR>%R <A href="http://doi.acm.org/10.1145/1294301.1294302" target=_blank>http://doi.acm.org/10.1145/1294301.1294302</A><BR>%I ACM<BR>ENDNOTE<BR><BR><BR>Você pode obter uma lista de { chave =&gt; valor } da seguinte maneira:<BR><BR>my %data = parse($sample);<BR><BR>sub parse {<BR>&nbsp; &nbsp; my $data = shift;<BR><BR>&nbsp; &nbsp; my %value;<BR>&nbsp; &nbsp; while ( $data =~ /^(..) (.+)$/gm ) {<BR>&nbsp; &nbsp; &nbsp; &nbsp; $value{$1} = $2;<BR>&nbsp; &nbsp; }<BR><BR>&nbsp; &nbsp; return %value;<BR>}<BR><BR><BR>Você pode inclusive usar um hash para traduzir o código para o<BR>significado desejado:<BR><BR>my %field = (<BR>&nbsp; &nbsp;
 &nbsp; &nbsp; '%0' =&gt; 'type',<BR>&nbsp; &nbsp; &nbsp; &nbsp; '%1' =&gt; 'id',<BR>&nbsp; &nbsp; &nbsp; &nbsp; '%A' =&gt; 'author',<BR>&nbsp; &nbsp; &nbsp; &nbsp; '%T' =&gt; 'title',<BR>&nbsp; &nbsp; &nbsp; &nbsp; '%J' =&gt; 'journal',<BR>&nbsp; &nbsp; &nbsp; &nbsp; # etc<BR>);<BR><BR>Espero que isso ajude a começar.<BR>_______________________________________________<BR>SaoPaulo-pm mailing list<BR><A href="http://br.mc562.mail.yahoo.com/mc/compose?to=SaoPaulo-pm@pm.org" ymailto="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</A><BR><A href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target=_blank>http://mail.pm.org/mailman/listinfo/saopaulo-pm</A><BR></DIV></BLOCKQUOTE></td></tr></table><br>


      <hr size=1>Veja quais são os assuntos do momento no Yahoo! + Buscados: <a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.maisbuscados.yahoo.com/">Top 10</a> - <a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.maisbuscados.yahoo.com/celebridades/">Celebridades</a> - <a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.maisbuscados.yahoo.com/m%C3%BAsica/">Música</a> - <a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.maisbuscados.yahoo.com/esportes/">Esportes</a>