sagax · April 6, 2019 22:13
diff --git a/encode_decode_url.tcl b/encode_decode_url.tcl
 package require ncgi

 set line "ссылка"
 puts "SRC: $line"
 set encoded [ncgi::encode [encoding convertto utf-8 $line]]
 puts "ENCODED: $encoded"
 set decoded [ncgi::decode $encoded]
 puts "DECODE $decoded"
	package require ncgi

	set line "ссылка"
	puts "SRC: $line"
	set encoded [ncgi::encode [encoding convertto utf-8 $line]]
	puts "ENCODED: $encoded"
	set decoded [ncgi::decode $encoded]
	puts "DECODE $decoded"