open(FILE, "$ARGV[7]/tmp/body.html");
read (FILE, $htmlfile, 60*57);
print MAIL $htmlfile;
close (FILE);