When running process with { binmode => ':utf8' }, I get this warning,
Argument ":utf8" isn't numeric in numeric eq (==) at /Library/Perl/
5.8.6/darwin-thread-multi-2level/Template.pm line 193.
Easiest change would be to just make the test $bm eq 1 rather than
the +$bm == 1 thing.
- ask
elsif (open(FP, ">$where")) {
# binmode option can be 1 or a specific layer, e.g. :utf8
my $bm = $options->{ binmode };
if ($bm && +$bm == 1) {
binmode FP;
}
elsif ($bm){
binmode FP, $bm;
}
--
http://develooper.com/ - http://askask.com/
_______________________________________________
templates mailing list
[email protected]
http://lists.template-toolkit.org/mailman/listinfo/templates