perl -wE 'use utf8; say q(Français)' | perl -lnwE 'print join q(:), unpack q(C*), $_' - 70:114:97:110:231:97:105:115 #### Русский