From: Michal Vaner Date: Mon, 6 Oct 2008 16:38:27 +0000 (+0200) Subject: Email is escaped X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=bcedcb9d169dd0b17a17d0df41010ac1a6a54598;p=pciids.git Email is escaped --- diff --git a/PciIds/Email.pm b/PciIds/Email.pm index ff252d5..6757886 100644 --- a/PciIds/Email.pm +++ b/PciIds/Email.pm @@ -35,7 +35,7 @@ sub sendMail( $$$ ) { ( $error, $to ) = emailCheck( $to, undef ); die "Invalid email in database $to\n" if defined $error; $body =~ s/^\.$/../gm; - open SENDMAIL, "|$sendmail -f$from $to" or die 'Can not send mail'; + open SENDMAIL, "|$sendmail -f'$from' '$to'" or die 'Can not send mail'; print SENDMAIL "From: $from\n". "To: $to\n". "Subject: $subject\n".