Select Code to Download

package DataDefs::Factory;
use strict;
...
}

1;

use DataDefs::Factory;

my $thingy = DataDefs::Factory->first_thing;

...
use Clone qw(clone);
...
    my($class) = @_;
    return clone($hash_thing);
}