print MAIL "To: Adminmail\n" or die $!;

##</code><code>##

open MAIL, "| $sendmail" or die $!;

##</code><code>##

open MAIL, '|', $sendmail or die $!;

##</code><code>##

my $sendmail = '/usr/sbin/sendmail -t -oi';
open MAIL, '|', $sendmail or die $!;