Re: mail from one email id to other email id

if ur using linux machine, hope this code will help you

#!/usr/bin/perl
use strict;
use warnings;

print "Content-type: text/html\n\n";

my  $title='some title here';
my  $to='nn@nn.com';
my  $from= 'aa@aa.com';
my  $subject='subject info here';

  open(MAIL, "|/usr/sbin/sendmail -t");

   ## Mail Header
   print MAIL "To: $to\n";
   print MAIL "From: $from\n";
   print MAIL "Subject: $subject\n\n";
   ## Mail Body
   print MAIL "  Info On:".localtime()."\n";
   print MAIL `df -h`."\n";
   print MAIL "-------------------------------------------------------
+--\n";
   print MAIL `free`."\n";
   print MAIL "-------------------------------------------------------
+---\n";

   close(MAIL);

 print "<html><head><title>$title</title></head>\n<body>\n\n";

      ## HTML content sent, let use know we sent an email
 print "<h1>$title</h1><p>A message has been sent from $from to $to</p
+></body></html>";
[download]

Comment on Re: mail from one email id to other email id Download Code

Replies are listed 'Best First'.
Re^2: mail from one email id to other email id by pradeep.cbp (Novice) on Jan 08, 2014 at 08:34 UTC
Thanks for the solution I tried with the above code and i am getting error as follows and dont we need to login to sender email id:? df: `/var/vob/a_gold/c65_iw522_dig/vob': Permission denied df: `/var/vob/a_gold/c65_iw522/vob': Permission denied df: `/var/vob/ecubes/ecubes_hw/vob': Permission denied df: `/var/vob/egv3_pmu/c65_iw522_dig/vob': Permission denied	[reply]