# unpackcidr < packed-list > unpacked-list

##</code><code>##

#!/usr/bin/perl

use Net::CIDR;
use Net::CIDR ':all';


print join("\n", Net::CIDR::cidr2octets(

# here's where I've tried <STDIN> && $_ but to no avail

)) . "\n";