Help for this page

Select Code to Download

Select or download this

$c = "a_c_code";
$c =~ s/(?<![^_])(.)/ucfirst($1)/ge;
print $c;