Conservancy/supporters
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Operate in utf8 for STDOUT.

Browse source
This commit is contained in:
Bradley M. Kuhn 2019-12-24 09:23:15 -08:00
parent 102b1f8468
commit 8985765760
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scripts/send-supporter-emails-by-category.plx
View file

@ -15,6 +15,8 @@ use Encode qw(encode decode);
use Email::MIME::RFC2047::Encoder; use Email::MIME::RFC2047::Encoder;
use utf8; use utf8;
binmode STDOUT, ":utf8";
my $encoder = Email::MIME::RFC2047::Encoder->new(); my $encoder = Email::MIME::RFC2047::Encoder->new();
my $TODAY = UnixDate(ParseDate("today"), '%Y-%m-%d'); my $TODAY = UnixDate(ParseDate("today"), '%Y-%m-%d');