[SP-pm] Data Serializer
Solli Honorio
shonorio at gmail.com
Thu Jul 31 14:00:37 PDT 2008
Vi você esqueceu de definir as variáveis com o 'my', tende declarar as
variáveis que o compilador está reclamando e eu acho que vai funcionar.
'my $this = ...'
'my $atrb = ...'
2008/7/31 Vi <vi.arievilo em gmail.com>
> Bom lah vai..
>
> S.O: usamos FreeBsd
> Perl: Usamos a versão 5.8.8
> Data::Serializer 0.46
>
> esse eh o código:
>
> #!/usr/local/bin/perl
> use Data::Serializer;
> use strict;
>
> #Pacote
> package DadosObjeto;
> #construtor
> sub new
> {
> my $obj = shift;
> $this = ref ($obj) || $obj;
>
> #atributos da classe
> $atrb =
> {
> nome => 'Marciolino',
> sobrenome => 'Martes de Venus Plutao',
> };
> return bless $this, $atrb;
> }
>
> #esse trecho eu peguei da documentacao do Cpan
> $obj = Data::Serializer->new();
> $obj = Data::Serializer->new(
> serializer => 'Storable',
> digester => 'MD5',
> cipher => 'DES',
> secret => 'my secret',
> compress => 1,
> );
>
> $serialized = $obj->serialize({a => [1,2,3],b => 5});
> $deserialized = $obj->deserialize($serialized);
> print "$deserialized->{b}\n";
>
>
> Como jah disse antes, sou iniciante em Perl, portanto nao sei se a parte do
> Pacote esta correta (peguei hj um tutorial que explica como funciona OO em
> perl)!
> E tambem nao sei se esta certo usar o mesmo script para a classe(pacote) e
> para a serializacao!
> Sei lah talvez se separar a classe da serializacao e chamar a classe no
> script onde ocorrera a serializacao funcionaria!?!?!?!!
> E como eu passo o objeto a ser serializado?
>
>
> E esses são os erros:
> Global symbol "$this" requires explicit package name at serialz.pl line 13.
> Global symbol "$atrb" requires explicit package name at serialz.pl line 15.
> Global symbol "$this" requires explicit package name at serialz.pl line 20.
> Global symbol "$atrb" requires explicit package name at serialz.pl line 20.
> Global symbol "$obj" requires explicit package name at serialz.pl line 25.
> Global symbol "$serialized" requires explicit package name at serialz.pl
> line 33.
> Global symbol "$obj" requires explicit package name at serialz.pl line 33.
> Global symbol "$deserialized" requires explicit package name at serialz.pl
> line 34.
> Global symbol "$obj" requires explicit package name at serialz.pl line 34.
> Global symbol "$serialized" requires explicit package name at serialz.pl
> line 34.
> Global symbol "$deserialized" requires explicit package name at serialz.pl
> line 35.
>
>
> Obrigada pela ajuda pssoal!!
>
>
>
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm em pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>
--
"o animal satisfeito dorme". - Guimarães Rosa
-------------- Pr?xima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/saopaulo-pm/attachments/20080731/2e2d1c88/attachment-0001.html>
More information about the SaoPaulo-pm
mailing list