Help for this page
Wide character in print at E:\...\ConnectSQLServer.pl line 122.
binmode STDOUT, ':utf8';
open( my $output_handle, '>:utf8', $output_name ) or die $!;