ã¯ããã«ã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
{{#tags}}- {{label}}
{{/tags}}