ive set up a simple table=20
Date | Number
8Jan | 1
9Jan | 2
#! /usr/bin/perl -w
use strict;
use Palm::PDB;
use Palm::Raw;
use Data::Dumper;
my $pdb =3D new Palm::PDB();
Palm::PDB::RegisterPDBHandlers("Palm::Raw", "");
my $pdb->Load("OR2.pdb");
print "name is ";
print $pdb->{"name"};
print "\n";
my @array =3D$pdb->{"records"};
print Dumper \@array;
gives this=20
$VAR1 =3D [
[
{
'data' =3D> 1',
'id' =3D> 13180929,
'category' =3D> 0,
'attributes' =3D> {
'Dirty' =3D> 1,
'dirty' =3D> 1
},
'offset' =3D> 138
},
{
'data' =3D> =D5 2',
'id' =3D> 13180930,
'category' =3D> 0,
'attributes' =3D> {
'Dirty' =3D> 1,
'dirty' =3D> 1
},
'offset' =3D> 148
}
]
];
router outreach # =20
Nay clues as to how I get access to the data ?
|