/ 
DBIx-Class-RandomStringColumns-0.10
River stage zero No dependents
/ DBIx::Class::RandomStringColumns

NAME

DBIx::Class::RandomStringColumns - Implicit random string columns

SYNOPSIS

pacakge CD;
__PACKAGE__->load_components(qw/RandomStringColumns Core DB/);
__PACKAGE__->random_string_columns('uid');

pacakge Artist;
__PACKAGE__->load_components(qw/RandomStringColumns Core DB/);
__PACKAGE__->random_string_columns(['rid', {length => 10}]);

package LoginUser
__PACKAGE__->load_components(qw/RandomStringColumns Core DB/);
__PACKAGE__->random_string_columns(
  ['rid', {length => 10}],
  ['login_id', {length => 15, solt => '[0-9]'}],
);

DESCRIPTION

This DBIx::Class component reassemble the behavior of Class::DBI::Plugin::RandomStringColumn, to make some columns implicitly created as random string.

Note that the component needs to be loaded before Core.

METHODS

insert

random_string_columns

$pkg->random_string_columns('uid'); # uid column set random string.
$pkg->random_string_columns(['rid', {length=>10}]); # set string length.
# set multi column rule
$pkg->random_string_columns(
  'uid',
  ['rid', {length => 10}],
  ['login_id', {length => 15, solt => '[0-9]'}],
);

this method need column name, and random string generate option.
option is "length", and "solt".

get_random_string

AUTHOR

Kan Fushihara <kan __at__ mobilefactory.jp>

LICENSE AND COPYRIGHT

Copyright (c) 2006, Kan Fushihara <kan __at__ mobilefactory.jp>. All rights reserved.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.