Select Code to Download

use DBI;
use Rose::DB;
...
$rdb->dbh( $dbh );

print "still here\n";

use base qw( Rose::DB );

...
my $u = My::RDBO::User->new(id => 1);
$u->load;
print("$_ => ", $u->$_, "\n") foreach $u->meta->columns;