my $a = $cfg{'default.player'};
my $b = "\xeb\xa6\xac\xec\x9e\x91";
if ($a eq $b) {
   print "indahouse\n";
}

##</code><code>##

open(ST, "<", $details) or die "Could not read $details: $!\n";
while (<ST>) {
	if (/m_name/) {
		if (/([\\\w]*)',$/) {
			$name = $1;
                        print Dumper($name);
                        if ($name eq $cfg{'default.player'}) {
                               print "indahouse\n";
                        }
                }
        }
}