Re: Why are my col names lowercased?

[prev] [thread] [next] [Date index for 2004/10/13]

--=-s32495R3CSf8Ri+CFqB8
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable

On Wed, 2004-10-13 at 15:29, Daniel Wijnands wrote:
> This does the trick :=20
>=20
> my $Object =3D YourObject->retrieve(id);
> my %data =3D map { $_->name , $Object->get($_->name)} $Object->columns;

Fantastic!!!! Many thanks!

--=20
Sean Quinlan <seanq@xxxxxx.xx.xxx>
BMERC, Boston University

--=-s32495R3CSf8Ri+CFqB8
Content-Type: application/pgp-signature; name=signature.asc
Content-Description: This is a digitally signed message part

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.4 (GNU/Linux)

iD8DBQBBbZkRnv2yYfTgGZsRAqcHAJ95zcB+EOzp2071WT25Wm9cnvdOSQCeNBml
A4HD72ATmALe5pI9PlZy2RI=
=Zh0N
-----END PGP SIGNATURE-----

--=-s32495R3CSf8Ri+CFqB8--