#!/usr/bin/perl use Encode; my $data='fÃ&¼r'; from_to($data, "utf8", "iso-8859-1"); print $data;