print FILE "$when|$to|$from|$subject|$body\n";