my @funcs = (
    '$A = B * C;',
    '$P = D+E+C;'
);

for my $func (@funcs) {
    $func =~ s/C/\$z/g;
    print "func : $func\n";
}
__END__
func : $A = B * $z;
func : $P = D+E+$z;