$temp = 1234567890;
$pattern = 123;

$temp =~ s/$pattern/*/i;

print "temp = $temp";