>>409 なんだかしらんが協力しるとのことで、検算してみるスクリプト
perl -e 'for(<>){chop;($n,$m)=split(/\//,$_);@s=split(/\./,$n);pop@s;
for($i=0;$i<2**(32-$m);$i++){$s=sprintf("%03d%03d%03d%03d\n",@s,$i);
if($s=~
/(21016824[67]|21101823[589]|22111900[0-9]|061198142|061198249|06119825[0345]|06120400[04]|06120400[36]0|06120400[36]1[01]|06120400[36]12[0-7])/
){$a++}}}print "$a\n"' < apcips.txt

txtには下のような感じで、単にページからコピペしたもの。
211.18.235.0/24
211.18.238.0/24

ここに適当なアドレスを加えても6144を超えなければいい
0.0.0.0/0 を加えて6144以上にならなければ完璧＜終わんないけど…

きれいな正規表現作成スクリプトは宿題にしてみる。