Email::Address::JP::Mobile - Japanese carrier email class
use Email::Address::JP::Mobile; my $carrier = Email::Address::JP::Mobile->new('docomo.taro.@docomo.ne.jp'); $carrier->is_mobile; # => true $carrier->name; # => "DoCoMo" $carrier->carrier_letter; # => "I"
or
use Email::Address::Loose; use Email::Address::JP::Mobile; my ($email) = Email::Address::Loose->parse('docomo.taro.@docomo.ne.jp'); $email->carrier->is_mobile; # => true
Email::Address::JP::Mobile is a module for Japanese web developers.
このモジュールは要するに HTTP::MobileAgent のメール版です。
同様のことができるモジュールに Mail::Address::MobileJp があります。 Email::Address::JP::Mobile は Email::Address オブジェクトを拡張する点や is_mobile($email) ではなく $email->carrier->is_mobile という インターフェースである点が違います。
is_mobile($email)
$email->carrier->is_mobile
メールアドレスから、対応したクラスを返します。
my $carrier = Email::Address::JP::Mobile->new('docomo.taro.@docomo.ne.jp'); # $carrier is a Email::Address::JP::Mobile::DoCoMo $carrier->is_mobile; # => true $carrier->name; # => "DoCoMo" $carrier->carrier_letter; # => "I"
携帯メアドではない場合は Email::Address::JP::Mobile::NonMobile クラスを返します。
my ($email) = Email::Address->parse('docomo.taro@docomo.ne.jp'); $email->carrier->carrier_letter; # "I"
Email::Address::JP::Mobile は Email::Address オブジェクトに carrier() というメソッドを拡張します。
carrier()
ご存知のように日本の携帯は変なアドレスが許可されている期間が長かったので、 携帯アドレスをパースする可能性があるのであれば Email::Address::Loose を 利用もしくは併用した方がよいです。
各メソッドが返す値は以下のとおりです。
is_mobile name carrier_letter ------------------------------------------------- DoCoMo true "DoCoMo" "I" au true "EZweb" "E" SoftBank true "SoftBank" "V" WILLCOM true "AirH" "H" NonMobile false "NonMobile" "N"
メールの解析、送信時用のエンコーディングを返すメソッドを追加予定。
Email::Address::Loose, Mail::Address::MobileJp
#mobilejp on irc.freenode.net (I've joined as "tomi-ru")
Naoki Tomita <tomita@cpan.org>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Email::Address::JP::Mobile, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Email::Address::JP::Mobile
CPAN shell
perl -MCPAN -e shell install Email::Address::JP::Mobile
For more information on module installation, please visit the detailed CPAN module installation guide.