PerlのモジュールNet::OpenID::Serverに関する質問です。

サンプルや仕様書を見ながら理解しようとしているのですが、どうもしっくり来ません。
一応動くものを作る事は出来ても、OpenIDの仕様に沿っているか、安全なのかが分からず困っています。
このサイトを見るとOpenIDがきちんと分かる、このサンプルを見てみると良いよなどあれば、あわせてご回答お願いいたします。

質問がはてなの文字数制限により全て書き込めませんでしたので、続きは以下のURLになります。
ご回答どうぞよろしくお願い申し上げます。
http://www.google.com/notebook/public/04856275948411007433/BDQ55DQoQzJCWvM0k?hl=ja