NAME

HTTP::MobileUserID::Nihongo - 携帯端末のユーザIDを取得する

概要

  use HTTP::MobileUserID;
  use HTTP::MobileAgent;
  
  my $agent  = HTTP::MobileAgent->new;
  my $userid = HTTP::MobileUserID->new($agent);
  
  if ( $userid->supported ) {
    print $userid->id;
  }

説明

携帯端末のユーザIDを取得します。

DoCoMoの場合は端末ID、SoftBankの場合はユーザID、AUの場合はサブスクライバIDを返します。

メソッド

user_id()

id()

ユーザIDを返します。

ユーザIDが取得できなかった場合は未定義値を返します。

supported()

unsupported()

その端末がそもそも固有のユーザIDを取得できるかどうかを判定します。

unsupportedが真になるのは以下のケース

• DoCoMoのHTMLバージョンが2.0以下の端末はutn属性が使えないので端末固有のIDを取得することは不可能。
• SoftBankのC型端末はユーザIDの取得ができない。（公式サイトなら可能、だったはず）

has_user_id()

no_user_id()

端末IDの取得には対応しているが何らかの理由でユーザIDが取得できないケースがあるのでそれを判定します。

no_user_idが真になるのは以下のケース

• DoCoMoでutn属性のリンクを経由しなかった場合
• SoftBankでユーザIDの通知設定を行わなかった場合
• AUでサブスクライバIDの通知設定を行わなかった場合

作者

Ittetsu Miyazaki <ittetsu.miyazaki@gmail.com>

Thanks to Dan Kogai

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

HTTP::MobileAgent