From 73d523c80dd848abbb5b5840cf7b23ffc85c5e2f Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Tue, 19 Jun 2018 17:00:22 -0300 Subject: [PATCH] Bug 13618: [DO NOT PUSH] have fun In order to generate quickly a lot of relevant data I have modified a bit TestBuilder->_gen_text to insert + $xss_data = 1; + $size -= 27; + } my $regex = $size > 1 ? '[A-Za-z][A-Za-z0-9_]{'.($size-1).'}' : '[A-Za-z]'; my $random = String::Random->new( rand_gen => \&alt_rand ); # rand_gen is only supported from 0.27 onward - return $random->randregex($regex); + $random = $random->randregex($regex); + return $xss_data ? qq|| : $random; } sub alt_rand { #Alternative randomizer -- 2.11.0