$subnets{$_}{'comment'} //= 'ALLOCATED' for keys %subnets;