# make the first letters of the NAME of the sender uppercase
my @from = split(/ /, $from);
$_ = ucfirst for @from;

# make the first letters of the NAME of the receiver uppercase
my @to = split(/ /, $to);
$_ = ucfirst for @to;

# make the first letter of the message upper case
$message = ucfirst($message);