my $encodedString = "AUTH PLAIN " . encode_base64(join("\0", $auth->{user}, $auth->{user}, $auth->{password}), $CRLF); my $decodedString = decode_base64($encodedString); warn("decodedString '$decodedString'");