@@ -, +, @@ deprecation % 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 file changed, 1 insertion(+), 1 deletion(-) --- 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|.*/||; --