soooo...habe mein script jetzt mal von fehlern bereinigt und alles nach vorschlägen beleuchtet

ich fand

my $hmac =
Digest::HMAC_MD5::hmac_md5_hex(MIME::Base64::decode($1), $me->Pass());
(my $response = MIME::Base64::encode($me->User() . " $hmac")) =~ s/[\r\n]//g;
$me->_sockprint($response, $me->EOL());

kann es damit zusammenhängen ???