randomize length field for substr 1

[mikawin]

Hello,

Is it possible to randomize the length field in the

substr($string_variable, start number, length);

I have multiple strings in a file that have 50-70 characters. I would like to randomly extract anything between 25 and 35 characters from the beginning for each of the strings.

Thanks,
Mika

 

[ishnid]

Use the 'rand' function to pick a number between 0 and 10, then add that to 25 to get the random number in the range you want.

 

[KevinADC]

one way:

my @nums = (25..35);
my $foo = substr $string,0,$nums[int rand(@nums)];

------------------------------------------
- Kevin, perl coder unexceptional!

 

[KevinADC]

Ishnids suggestion is a bit better, here it is:

my $foo = substr $string,0,int rand(11)+25;

Note I used 11 instead of 10.



------------------------------------------
- Kevin, perl coder unexceptional!

 

[mikawin]

Thanks KevinADC, ishnid.
~ Mika