[B! openid][perl] dannのブックマーク

Catalystでmixi OpenIDからニックネームを取得 - Problems

ボヤボヤしてるうちにmixiがOpenIDのProviderになって、そろそろOpenIDのRPに対応する準備しとかんとあかんやろ、と思い、認証してニックネームを取得してくるだけのRPのテストプログラムを作ってみた。ここで紹介されているサンプルのCatalyst版（の更にマイミク認証を除いたやつ）です。 mixi OpenIDで「マイミクシィだけの掲示板」を作ろう(Perl編) - ラーニング人生。 Catalystは当然インストールしてあるとして、事前にNet::OpenID::ConsumerとCatalyst::Authentication::Credential::OpenIDの2つのモジュールをCPANに上がっているやつじゃなくてSubversionのリポジトリから取得してそれぞれインストールします。 Net::OpenID::Consumerの方は依存モジュールに注意した方が

dann 2008/09/30

リンク

OpenID 2.0とCatalystで遊んでみる - めもおきば

まず各所に転がっているOpenID2.0対応版ライブラリに差し替える。 http://code.sixapart.com/trac/openid/browser/trunk/perl/Net-OpenID-Consumer http://coderepos.org/share/browser/lang/perl/Catalyst-Authentication-Credential-OpenID/trunk/lib/Catalyst/Authentication/Credential/OpenID.pm ここまで入れたら、適当にcatalyst.plして、 sub openid : Local { my ( $self, $c ) = @_; if ( $c->authenticate() ) { $c->flash( message => 'You signed in with OpenI

dann 2008/09/13

リンク

CodeZine：OpenIDを使ってみよう（openid, 認証方法, Perl）

はじめに　OpenIDは最近非常に注目が高まっている認証技術の一つです。ここでは、OpenIDを利用したPerlのサンプルを通じてOpenIDのメカニズムに触れていきたいと思います。必要な環境　Perl 5.8以上が動作する環境が良いと思います。基本動作の確認はMac OS Xを利用しましたサンプルの紹介　早速サンプルコードの「openid-test.cgi」を見ることにしましょう。このサンプルはOpenIDを利用した簡易ログインページです。 #!/usr/bin/perl use strict; use warnings; use CGI; use Net::OpenID::Consumer; #use LWPx::ParanoidAgent; use LWP::UserAgent; my $query = CGI->new; $query->charset('utf-8

dann 2007/06/09

openid
perl

リンク

#!shebang.jp : OpenID 実装した件

May 07, 200716:42 OpenID 実装した件カテゴリ技術ネタ OpenIDを実装してみました。このブログでもさっそく、delegate 設定しました。とりあえず、サーバ側の提供ですが、OpenID を利用したサービスも何か出来るといいかなと思ってます。実装自体は Net::OpenID::Server を使ったので非常に簡単でした。一つハマったのが Net::OpenID::Server は Crypt::DH を使ってるのですが、Math::BigInt::Pari か Math::BigInt::GMP をインストールしておかないと非常に動作が遅くなってしまいます。素の Math::BigInt を使ってても、遅いだけで正常に動作するのでなかなか気づきづらいです。。 Perl で OpenID 実装しようと思ってる方はご注意を。「技術ネタ」カテゴリの最新記