法國法院認為 Facebook 條款違反消費者保護法令

在「France says Facebook must face French law in nudity censorship case」這邊提到法院認為 Facebook 的使用條款中要求必須在加州法院解決的條件,使得法國的使用者難以提出訴訟,違反法國的消費者保護法令而無效:

The Terms of Service add, "The laws of the State of California will govern this Statement, as well as any claim that might arise between you and us, without regard to conflict of law provisions.”

The appeals court agreed that Facebook’s Terms of Service were “abusive” and "violated French consumer law by making it difficult for people in France to sue,” according to the BBC.

引用的 BBC 報導可以在「Paris court rules against Facebook in French nudity case」這邊看到:

The Paris high court decided that the company's argument was "abusive" and violated French consumer law, by making it difficult for people in France to sue.

用 Net::OpenID::Consumer 取得 Google 的帳戶資料

GoogleOpenID 服務有提供 OpenID Attribute Exchange 1.0 (參考「Federated Login for Google Account Users」這個網頁), 測了一陣子才知道要怎麼透過 PerlNet::OpenID::Consumer 取得資料:

my $csr = Net::OpenID::Consumer->new(
    ua => LWPx::ParanoidAgent->new,
    args => {},
    consumer_secret => 'secret',
    required_root => 'http://.../',
    minimum_version => 2
);

my $claimed_identity = $csr->claimed_identity('https://www.google.com/accounts/o8/id');

$claimed_identity->set_extension_args(
    'http://openid.net/srv/ax/1.0',
    {
        mode => 'fetch_request',
        required => 'email',
        'type.email' => 'http://axschema.org/contact/email',
    }
);

my $check_url = $claimed_identity->check_url(
    delayed_return => 1,
    return_to => 'http://.../...',
    trust_root => 'http://.../'
);

say $check_url;

之前會試不出來,主要是卡在 type.email 忘記加,加上去的時候又打成 email...