@@ -, +, @@ the minimum of (+1 max string length in the field, size cap). After a couple glitches testing, my bad, it does reduce failures drastically. I had category code of length 4 in my database at the time. --- t/lib/TestBuilder.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) --- a/t/lib/TestBuilder.pm +++ a/t/lib/TestBuilder.pm @@ -299,7 +299,11 @@ sub _gen_text { $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 { --