print MAIL "$body[0]\n";