in 5.8 you can use following code for charset conversion

open SRC, '<:encoding(utf-8)', './text.utf' or die "src: $!";
open DST, '>:encoding(iso-8859-13)', './text.iso' or die "dst: $!";
@text = <SRC>;
print DST @text;
close SRC;
close DST;
[download]