Changeset 2714
- Timestamp:
- 12/07/07 11:05:59 (6 years ago)
- Files:
-
- 1 modified
Legend:
- Unmodified
- Added
- Removed
-
lang/perl/Net-CIDR-MobileJP/trunk/lib/Net/CIDR/MobileJP/Scraper.pm
r2713 r2714 9 9 EZWeb => 'E', 10 10 AirHPhone => 'H', 11 SoftBank => 'S',12 11 ThirdForce => 'V', 13 12 }; … … 19 18 20 19 my $result; 21 for my $carrier (qw/DoCoMo EZWeb AirHPhone SoftBankThirdForce/) {20 for my $carrier (qw/DoCoMo EZWeb AirHPhone ThirdForce/) { 22 21 my $class = "WWW::MobileCarrierJP::${carrier}::CIDR"; 23 22 $class->use or die $@;
![(please configure the [header_logo] section in trac.ini)](/share/chrome/site/your_project_logo.png)