$regex = '[A-Za-z]';
}
my $random = String::Random->new( max => $size );
return $random->randregex($regex);
my $string = $random->randregex($regex);
while ( defined $size and $size > 2 and length( $string ) <= 2 ) {
$string = $random->randregex($regex);
return $string;
sub _gen_set_enum {
-