From bcedcb9d169dd0b17a17d0df41010ac1a6a54598 Mon Sep 17 00:00:00 2001 From: Michal Vaner Date: Mon, 6 Oct 2008 18:38:27 +0200 Subject: [PATCH] Email is escaped --- PciIds/Email.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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". -- 2.39.2