Perlコーディング初心者質問スレ Part 56

[0124 nobodyさん 2007/09/27(木) 16:59:17 ID:???]

>>110
これじゃだめなん？

use Net::CIDR;

print join("\n", Net::CIDR::cidr2octets("1000:1234:abcd:2000::/127"));