use Encode;
my $chapid = CGI::param('chap-id');
my $chapchalange = CGI::param('chap-challenge');
$chapid = Encode::decode('CP1251', $chapid, Encode::FB_CROAK);
$chapchalange = Encode::decode('CP1251', $chapchalange, Encode::FB_CROAK);