Select Code to Download

__PACKAGE__->table('tblSubNet');
__PACKAGE__->add_columns(
...
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->add_unique_constraint(['bitpattern']);

my $order_by_size_rs = $all_subnets_rs->search({'source'=>$source},{'o
+rder_by'=>{'-asc','mask'}});

...
        ... # Code to add the overlaps to the report.
    }
}