From cda080ce72107ef7b2fe52ac1b32bb729c480d2b Mon Sep 17 00:00:00 2001 From: Mercier Pierre-Olivier Date: Wed, 30 Oct 2013 02:46:17 +0100 Subject: [PATCH] Prefer use of require instead of eval --- utils/lpt | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/utils/lpt b/utils/lpt index 70c9d11..a255a8a 100755 --- a/utils/lpt +++ b/utils/lpt @@ -1460,7 +1460,7 @@ PS: Ce message est g Les roots ACU"; # create the message - eval "use Email::Sender::Simple qw(sendmail); 1"; + require Email::Sender::Simple qw(sendmail); my $mail = Email::MIME->create( header_str => [ @@ -1502,7 +1502,7 @@ Cordialement, Les roots ACU"; # create the message - eval "use Email::Sender::Simple qw(sendmail); 1"; + require Email::Sender::Simple qw(sendmail); my $mail = Email::MIME->create( header_str => [ @@ -1674,7 +1674,7 @@ PS: Ce message est g Les roots ACU"; # create the message - eval "use Email::Sender::Simple qw(sendmail); 1"; + require Email::Sender::Simple qw(sendmail); my $mail = Email::MIME->create( header_str => [ @@ -1739,7 +1739,7 @@ PS: Ce message est g -- Les roots ACU"; - eval "use Email::Sender::Simple qw(sendmail); 1"; + require Email::Sender::Simple qw(sendmail); my $mail = Email::MIME->create( header_str => [