DBIx::Class::UUIDColumns::UUIDMaker::APR::UUID − Create uuids using APR::UUID
package Artist; __PACKAGE__−>load_components(qw/UUIDColumns Core DB/); __PACKAGE__−>uuid_columns( 'artist_id' ); __PACKAGE__−>uuid_class('::APR::UUID');
This DBIx::Class::UUIDColumns::UUIDMaker subclass uses APR::UUID to generate uuid strings in the following format:
098f2470−bae0−11cd−b579−08002b30bfeb
as_string
Returns the new uuid as a string.
APR::UUID
Chris Laco <claco AT chrislaco DOT com>
You may distribute this code under the same terms as Perl itself.