#!/usr/bin/perlmy $message = '';$message...