123.123.123.123という形式で渡されるアドレスを、バイナリに直して、ビット演算とか?

$ENV{REMOTE_ADDR} =~ /^123\.123\.123\./
中途半端なサブネットマスクでなければ、これでいいような・・