Help for this page

Select Code to Download


  1. or download this
    [414][/cygdrive/r/micmac]$ cpan install Log::Dispatch::Email::MailSend
    +er
    CPAN: Storable loaded ok (v2.27)
    ...
      Database was generated on Thu, 26 Jun 2014 20:41:02 GMT
    CPAN: Module::CoreList loaded ok (v2.49_02)
    Log::Dispatch::Email::MailSender is up to date (2.41).
    
  2. or download this
    [415][/cygdrive/r/micmac]$ ./lw_ex1.pl
    ERROR: can't load appenderclass 'Log::Dispatch::Email::MailSender'
    Can't locate Mail/Sender.pm in @INC (@INC contains: /usr/lib/perl5/sit
    +e_perl/5.14/i686-cygwin-threads-64int /usr/lib/perl5/site_perl/5.14 /
    +usr/lib/perl5/vendor_perl/5.14/i686-cygwin-threads-64int /usr/lib/per
    +l5/vendor_perl/5.14 /usr/lib/perl5/5.14/i686-cygwin-threads-64int /us
    +r/lib/perl5/5.14 /usr/lib/perl5/site_perl/5.10 /usr/lib/perl5/vendor_
    +perl/5.10 /usr/lib/perl5/site_perl/5.8 .) at /usr/lib/perl5/site_perl
    +/5.14/Log/Dispatch/Email/MailSender.pm line 18.
    BEGIN failed--compilation aborted at /usr/lib/perl5/site_perl/5.14/Log
    +/Dispatch/Email/MailSender.pm line 18.
    Compilation failed in require at (eval 24) line 2.
    
  3. or download this
    [417][/cygdrive/r/davem]$ perl -MLog::Dispatch::Email::MailSender -e 1
    Can't locate Mail/Sender.pm in @INC (@INC contains: /usr/lib/perl5/sit
    +e_perl/5.14/i686-cygwin-threads-64int /usr/lib/perl5/site_perl/5.14 /
    +usr/lib/perl5/vendor_perl/5.14/i686-cygwin-threads-64int /usr/lib/per
    +l5/vendor_perl/5.14 /usr/lib/perl5/5.14/i686-cygwin-threads-64int /us
    +r/lib/perl5/5.14 /usr/lib/perl5/site_perl/5.10 /usr/lib/perl5/vendor_
    +perl/5.10 /usr/lib/perl5/site_perl/5.8 .) at /usr/lib/perl5/site_perl
    +/5.14/Log/Dispatch/Email/MailSender.pm line 18.
    BEGIN failed--compilation aborted at /usr/lib/perl5/site_perl/5.14/Log
    +/Dispatch/Email/MailSender.pm line 18.
    Compilation failed in require.
    BEGIN failed--compilation aborted.
    
  4. or download this
    #Mailer 
    log4perl.appender.Mailer=Log::Dispatch::Email::MailSender
    ...
    log4perl.appender.Mailer.Threshold=WARN
    log4perl.appender.Mailer.buffered=${Buffered}
    log4perl.appender.Mailer.Filter=MailFilter
    
  5. or download this
    #!/usr/bin/perl
    use strict;
    ...
    my $logger = get_logger("example");
    $logger->info("START " . basename($0));
    $logger->info("la ti da");