sub format_email_text
{
   return join("\n", 
      sprintf("%-30s %-50s", "Player Name:",   $player),
      sprintf("%-30s %-50s", "Parent's Name:", $parent),
      sprintf("%-30s %-50s", "Member ID:",     $memberid),
   );
}

...
$text = format_email_text();
...