$x = int(rand(100));

##</code><code>##

$y =~ s!^\d{2}!$x!;