@@ -, +, @@ % perl misc/export_borrowers.pl -w "borrowernumber=42" --field borrowernumber --field surname --field firstname Use of the encoding pragma is deprecated at misc/export_borrowers.pl 7874,JOUBU,صةصةصة % perl misc/export_borrowers.pl -w "borrowernumber=42" --field borrowernumber --field surname --field firstname 7874,JOUBU,صةصةصة I confirm the warning (on Perl version above 5.14). And that the patch fix the warning. --- misc/export_borrowers.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) --- a/misc/export_borrowers.pl +++ a/misc/export_borrowers.pl @@ -26,7 +26,7 @@ use Getopt::Long qw(:config no_ignore_case); use C4::Context; use C4::Members; -use encoding 'utf8'; +binmode STDOUT, ":encoding(UTF-8)"; sub print_usage { ( my $basename = $0 ) =~ s|.*/||; --