$string = "to my beloved wife";
$string = ucfirst $string;
print $string;