Select Code to Download

package Model::DB::Result::Thing;
use warnings;
...
  },
);

package Model::DB;
use strict;
...
use base 'DBIx::Class::Schema';
__PACKAGE__->load_namespaces;
1;

$VAR2 = bless( {
  '_result_source' => $VAR1->{'_result_source'},
...
    'id' => 99,
  }
}, 'MyApp::Model::DB::Thing' );

[
  {
...

]