...
my $z = 99;

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