Changeset 908

Show
Ignore:
Timestamp:
07/15/03 17:44:38
Author:
miyagawa
Message:

added vodafone.ne.jp

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Mail-Address-MobileJp/trunk/Changes

    r374 r908  
    11Revision history for Perl extension Mail::Address::MobileJp. 
     2 
     30.03  Tue Jul 15 17:44:44 JST 2003 
     4        * Added *.vodafone.ne.jp 
    25 
    360.02  Sun Dec 16 22:13:30 JST 2001 
  • Mail-Address-MobileJp/trunk/lib/Mail/Address/MobileJp.pm

    r374 r908  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = '0.02'; 
     5$VERSION = '0.03'; 
    66 
    77BEGIN { 
     
    6868emcm\.ne\.jp| 
    6969p1\.foomoon\.com| 
    70 .*\.i\-get\.ne\.jp  
     70.*\.i\-get\.ne\.jp| 
     71[dhtckrnsq]\.vodafone\.ne\.jp 
    7172)$@x; # end of qr@@ 
    7273 
  • Mail-Address-MobileJp/trunk/t/01_mobile.t

    r374 r908  
    11use strict; 
    2 use Test::More tests => 24
     2use Test::More tests => 26
    33 
    44use Mail::Address; 
     
    2525    'foo@p1.foomoon.com', 
    2626    'foo@x.i-get.ne.jp', 
     27    'foo@d.vodafone.ne.jp', 
    2728    Mail::Address->parse('foo <foo@p1.foomoon.com>'), 
    2829); 
     
    3233    'foo@dxx.pdx.ne.jp', 
    3334    'barabr', 
     35    'foo@a.vodafone.ne.jp', 
    3436    Mail::Address->parse('foo <foo@doo.com>'), 
    3537);