Select Code to Download

package Table;
use Moose::Role;
...

    # loop thru $sth and add Moose attributes
}

package MyTable;
use Moose;
with 'Table';

parse_table( 'my_table' );