Select Code to Download

$temp = 1234567890;
$pattern = 123;
...
$temp =~ s/$pattern/*/i;

print "temp = $temp";

$temp = 4567890321;
$pattern = 123;