my $mail = new FileHandle "/usr/sbin/sendmail";