sub theNumberYouFirstThoughtOf{ 3 };;
$n=1; 
print 'this' . ' ' x ( $n * rand() + theNumberYouFirstThoughtOf() ) . 'that';;
this   that