WILLCOMのIPアドレス帯域削除

2011/04/28付けで以下のWebアクセス時IPアドレス帯域が削除された。

  • 61.198.138.100/32
  • 61.198.138.101/32
  • 61.198.138.102/32
  • 61.198.138.103/32
  • 114.21.254.0/27

サービス|Y!mobile - 格安SIM・スマホはワイモバイルで

http://wap2.jp/download/ip/willcom_ip.txt

上記を、IPアドレス帯域をまとめる方法 - Kimura.Memoに書いたようにNetAddr::IPモジュールを使ってコンパクトにすると、

#!/usr/bin/perl
use strict;
use NetAddr::IP();

main:
{
    my @addrs = ();

    open ( IP, 'willcom_ip.txt' ) or die("Open error. $!");

    while ( <IP> ) {
        last if ( $_ =~ /Mail/ );
        next if ( $_ =~ /^#/ );
        my ( $ip_mask, $ip, $mask, $ip_bin ) = split ( "\t", $_ );
        my $addr = NetAddr::IP->new($ip, $mask);
        push ( @addrs, $addr );
    }

    my $me = shift @addrs;

    my @compact = $me->compact(@addrs);

    print "\n", join( "\n", @compact );
}

【実行結果】
61.198.128.0/21
61.198.136.0/23
61.198.139.0/29
61.198.139.128/27
61.198.139.160/28
61.198.140.0/22
61.198.160.0/22
61.198.164.0/23
61.198.166.0/24
61.198.168.0/21
61.198.248.0/21
61.204.0.0/24
61.204.2.0/23
61.204.4.0/23
61.204.6.0/24
61.204.7.0/25
61.204.92.0/22
114.20.49.0/24
114.20.50.0/23
114.20.52.0/22
114.20.56.0/21
114.20.64.0/22
114.21.128.0/20
114.21.144.0/22
114.21.148.0/23
125.28.0.0/22
125.28.4.0/23
125.28.8.0/24
125.28.15.0/24
125.28.16.0/23
192.168.100.4/32
210.168.246.0/23
210.169.92.0/22
210.169.96.0/22
210.255.190.0/24
211.18.232.0/22
211.18.236.0/23
211.126.192.128/25
219.108.7.0/24
219.108.8.0/21
221.119.0.0/22
221.119.4.0/24
221.119.6.0/23
221.119.8.0/23

おおおおっ、140個→44個になった。