> perl
$function_used = "memcpy";
$function_call = "memcpy(a, b, sizeof(a))";
$function_call =~ s/$function_used//g;
print $function_call;
__END__
(a, b, sizeof(a))