X-Git-Url: http://git.ieval.ro/?p=app-edwardng.git;a=blobdiff_plain;f=lib%2FApp%2FEdwardNG.pm;fp=lib%2FApp%2FEdwardNG.pm;h=8343b473d0731756366bfe7761a3ca8e3a10202c;hp=4da1968ce2ab082321fc2ea5b334252f2ee6767e;hb=8cf8d32866e05fd07dcc71c6ea18ee87efbea45c;hpb=ac3c4df543b1f093ddd27415fe4f72ab54ca3b95 diff --git a/lib/App/EdwardNG.pm b/lib/App/EdwardNG.pm index 4da1968..8343b47 100644 --- a/lib/App/EdwardNG.pm +++ b/lib/App/EdwardNG.pm @@ -96,11 +96,13 @@ sub run { 'from=s' => \$ENV{EDWARDNG_FROM}, 'key=s' => \$ENV{EDWARDNG_KEY}, 'keydir=s' => \$ENV{EDWARDNG_KEYDIR}, + 'logfile=s' => \$ENV{EDWARDNG_LOGFILE}, 'passphrase=s' => \$ENV{EDWARDNG_PASSPHRASE}, 'tmpl-path=s' => \$ENV{EDWARDNG_TMPL_PATH}, 'use-agent!' => \$ENV{EDWARDNG_USE_AGENT}, ); my $tmpl_path = $ENV{EDWARDNG_TMPL_PATH} // 'en'; + open STDERR, '>>', $ENV{EDWARDNG_LOGFILE} if $ENV{EDWARDNG_LOGFILE}; my $parser = MIME::Parser->new; $parser->decode_bodies(0);