Help for this page

Select Code to Download


  1. or download this
    $ perl mail1.pl
No real MTA found, using 'testfile' at /usr/local/share/perl/5.14.2/Ma
+il/Mailer.pm line 108.
we arrived here
mailer= Mail::Mailer::testfile=GLOB(0x91baf7c)  Reminder= Feed Dino be
+fore you go to the quarry.
$
  2. or download this
    use strict;
use warnings;

...
print "mailer= ",$mailer,"  Reminder= ",$Reminder,"\n";
$mailer->close() or die "Can't send: $!\n";
}
  3. or download this
    $ cat mailer.testfile

...
From: fred@192.168.1.171

Feed Dino before you go to the quarry.$