- code usr bin perluse Encode text u041b u044e u0431 u0435 u0440 u0435 u044, михалыч (ok), 05:06 , 19-Фев-17 (1)
> Подскажите пжста, как на перл перекодировать в читаемый вид уникод-строку типа \u041b\u044e\u0431\u0435\u0440\u0435\u0446\u043a\u0438\u0439 #!/usr/bin/perluse Encode; $text='\u041b\u044e\u0431\u0435\u0440\u0435\u0446\u043a\u0438\u0439'; print Encode::from_to($text,'utf8','koi8r'); 60
- s u pack U , hex 1 eg , Аноним (17), 21:37 , 11-Июл-18 (17)
> Подскажите пжста, как на перл перекодировать в читаемый вид уникод-строку типа \u041b\u044e\u0431\u0435\u0440\u0435\u0446\u043a\u0438\u0439 s/\\u(....)/ pack 'U*', hex($1) /eg;
|