|
Lines 131-138
if ( $email_add ) {
Link Here
|
| 131 |
} |
131 |
} |
| 132 |
|
132 |
|
| 133 |
if ( $template_res =~ /<MESSAGE>(.*)<END_MESSAGE>/s ) { |
133 |
if ( $template_res =~ /<MESSAGE>(.*)<END_MESSAGE>/s ) { |
| 134 |
$body = encode_qp($1); |
134 |
$body = $1; |
| 135 |
$body =~ s|\n?(.*)\n?|$1|; |
135 |
$body =~ s|\n?(.*)\n?|$1|; |
|
|
136 |
$body = encode("UTF-8", encode_qp($body)); |
| 136 |
} |
137 |
} |
| 137 |
|
138 |
|
| 138 |
my $boundary = "====" . time() . "===="; |
139 |
my $boundary = "====" . time() . "===="; |
| 139 |
- |
|
|