$_ = "##";
m/(##)/;
$1 = "Hello";
Modification of a read-only value attempted at - line 3.

##</code><code>##

@list = ($1, $2, $3, $4, $5);
foreach $i (@list)
{
	$i = int rand( @numb +1 );
 	pop @numb;
}