Select Code to Download

$minlength=5; $maxlength=15;
$rlength=$minlength+=int(rand($maxlength));
...
$newvar.=$char
}
print $newvar

while(@whatever) {
s/blah/rwg()/ge;
}