Re: [coldsync-hackers] p5-palm: problem using raw.pm

["Wojtek" <wog@ekspert.szczecin.pl>]

> use Palm::Raw;
> $pdb = new Palm::Raw;
> $pdb->Load("StrokeDB.pdb");
> print $pdb->{appinfo};
> print "\n";
>
> $z=0;
>
> foreach $eintrag (@{$pdb->{records}}){
>
>     $entry = (@{$pdb->{records}});                   /// won't it be the
same all the time ?
>     print ("Entry Nr $z : " . $entry . "\n");
>     ($x,$y,$oldx,$oldy,$t) = unpack("ssssL", $eintrag->data);      ///
this way
>     print "$x , $y , $oldx, $oldy, $t\n";
> }

Look at this:

foreach $sss (@{$PDB->{"records"}})
   {
  my ($numer,$id,$ilosc,)=unpack($unpackstr,$sss->{data});
   }
see the difference?
$pdb->{records}->{data} contains raw data of record.
By my way $entry contains number of array $pdb->{records}. (?)



-- 
This message was sent through the coldsync-hackers mailing list.  To remove
yourself from this mailing list, send a message to majordomo@thedotin.net
with the words "unsubscribe coldsync-hackers" in the message body.  For more
information on Coldsync, send mail to coldsync-hackers-owner@thedotin.net.