I finally decided to raise my
personal OpenID server
(well, yes, I’m paranoid, I don’t want someone else to collect information on which sites I’m visiting) . And I wanted it to be written in Perl. Searched the network - no! Moreover, it’s unbelievable, but on CPAN there are only two modules for OpenID, one terribly bloated and obviously unfinished, and the second seems to be quite good (
Net :: OpenID :: Server Fitzpatrick), but there is practically no documentation and examples for it. :(
In general, in 6 hours I wrote my server:
OpenIDsrv . It may be useful to other paranoids or as a supplement to the documentation on Net :: OpenID :: Server.
Than it is normal to test it, I never found. Just authorization can be checked through
OpenID Checkup , but you can’t check
SRE . To check the SRE, I had to start a blog on the first platform (blogger.com) and post comments there.
')
As I understand it, there is no single or even just the preferred way to bind a name / nickname to OpenID. Both SRE and hCard are used. In general, I had
to prescribe hCard for
myself , but in order to find a way to test whether I registered it correctly, I had to properly search for the
hCard Extract service.