thanks Gabriel, me poupou o trabalho, eu já ia RTFM :-P ;-)<br><br><div class="gmail_quote">2009/2/3 Gabriel Vieira <span dir="ltr"><<a href="mailto:gabriel.vieira@gmail.com">gabriel.vieira@gmail.com</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
É erro no código sim!<br>
<br>
É necessário que você passe 12 ou 13 dígitos para a criação do novo<br>
objeto. Como isso não é feito o objeto não é criado. Em seguida vc<br>
tenta usar o método plot em um objeto que não existe, ou melhor, em<br>
uma variável vazia.<br>
<br>
--------------------8<--------------------<br>
use GD::Barcode::EAN13;<br>
my $oGdBar = GD::Barcode::EAN13->new('1234567890123');<br>
<div class="Ih2E3d">die $GD::Barcode::EAN13::errStr unless($oGdBar);<br>
</div>print $oGdBar->plot->png;<br>
-------------------->8--------------------<br>
Imprime o código de barras.<br>
<br>
--------------------8<--------------------<br>
use GD::Barcode::EAN13;<br>
binmode(STDOUT);<br>
my $oGdBar = GD::Barcode::EAN13->new('1234567890');<br>
<div class="Ih2E3d">die $GD::Barcode::EAN13::errStr unless($oGdBar);<br>
</div>print $oGdBar->plot->png;<br>
-------------------->8--------------------<br>
Imprime o erro que levou à não criação do código de barras - no caso,<br>
menos de 12 caracters.<br>
<br>
<br>
Abraços,<br>
<br>
2009/2/3 Ricardo Stock <<a href="mailto:ricardostock@bol.com.br">ricardostock@bol.com.br</a>>:<br>
<div><div></div><div class="Wj3C7c">> Ola, Russo, agradeço pela ajuda, mas infelizmente o erro não está no código.<br>
> Ao executar o mesmo excuta, mas não gera a imagem. Vendo o log do apache, a<br>
> mensagem de erro que tenho que que não pode invocar/reconhece o metodo plot.<br>
><br>
> // log<br>
> Can't call method "plot" on an undefined value at<br>
><br>
> Vale lembrar que meu servidor é Win2003 Server. bom vou continuar estudando,<br>
> caso alguem tenha alguma dica ou algo parecido, agradeço.<br>
><br>
> Ah, vale lembrar... rodando o exemplo do CPAN, deu o mesmo erro. Bom<br>
> agradeço a qualquer ajuda.<br>
><br>
><br>
><br>
><br>
><br>
> ----- Original Message -----<br>
> From: Alexei Znamensky<br>
> To: Cascavel Perl Mongers<br>
> Sent: Tuesday, February 03, 2009 12:49 AM<br>
> Subject: Re: [Cascavel-pm] codigo de barras<br>
> Ricardo,<br>
><br>
> Presumindo que você copiou e colou seu código no email:<br>
><br>
> new('$produto')<br>
><br>
> aspas simples? com aspas simples você usou a string literal $produto, ao<br>
> invés de usar o valor da variável escalar produto.<br>
><br>
> Se no email tá errado, mas no código está certo, aí eu já não tenho certeza.<br>
> O que talvez esteja faltando é um check, logo após construir o objeto, as in<br>
><br>
> with Error Check<br>
><br>
> my $oGdBar = GD::Barcode::EAN13->new('123456789');<br>
> die $GD::Barcode::EAN13::errStr unless($oGdBar); #Invalid Length<br>
><br>
> Tirado diretamente da página do módulo no CPAN.<br>
><br>
> Read The Freaking Manual? :-P<br>
><br>
> []s,<br>
> Russo<br>
><br>
><br>
> 2009/2/2 Ricardo Stock <<a href="mailto:ricardostock@bol.com.br">ricardostock@bol.com.br</a>><br>
>><br>
>><br>
>> Ola a todos da Lista.<br>
>><br>
>> Estou tentando gerar códigos de barras padrão EAN13 automaticamente, porém<br>
>> o codigo não me da erros, mas também não gera a imagem. Ao "printar" na<br>
>> tela, fica apenas o espaço reservado a imagem, mas nada da imagem de codigo<br>
>> de barras...<br>
>><br>
>> no log, me informa que o metodo plot não é aceito... alguma sugestão.<br>
>><br>
>> segue treho do código.<br>
>><br>
>><br>
>> use strict;<br>
>> use warnings;<br>
>> use GD::Barcode::EAN13;<br>
>> my $barra=GD::Barcode::EAN13->new('$produto'); #CAMPO NUMERO OU TEXTO<br>
>> binmode(STDOUT);<br>
>> print "Content-Type: image/png\n\n";<br>
>> print $barra->plot->png;<br>
>><br>
>><br>
>> Ricardo Stock<br>
>> <a href="mailto:ricardostock@bol.com.br">ricardostock@bol.com.br</a><br>
>> _______________________________________________<br>
>> Cascavel-pm mailing list<br>
>> <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
>> <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
><br>
><br>
><br>
> --<br>
> Alexei Znamensky [russoz_gmail_com] [<a href="http://russoz.wordpress.com" target="_blank">russoz.wordpress.com</a>]<br>
> [<a href="http://www.flickr.com/photos/alexeiz" target="_blank">www.flickr.com/photos/alexeiz</a>]<br>
> "Though we live in trying times, we're the ones who have to try"<br>
><br>
> ________________________________<br>
><br>
> _______________________________________________<br>
> Cascavel-pm mailing list<br>
> <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
><br>
> _______________________________________________<br>
> Cascavel-pm mailing list<br>
> <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
><br>
<br>
<br>
<br>
--<br>
</div></div><font color="#888888">Gabriel Vieira<br>
</font><div><div></div><div class="Wj3C7c">_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Alexei Znamensky [russoz_gmail_com] [<a href="http://russoz.wordpress.com">russoz.wordpress.com</a>] [<a href="http://www.flickr.com/photos/alexeiz">www.flickr.com/photos/alexeiz</a>]<br>
"Though we live in trying times, we're the ones who have to try"<br>