binmode(STDOUT, ":encoding(cp437)");

use URI::Escape;
use Encode;

$str="%C3%B6";
$oct  = uri_unescape($str);
$string = decode("utf-8", $oct);
print $string;