my @cust_pkg = $cust_main->ncancelled_pkgs;
foreach my $cust_pkg ( @cust_pkg ) {
foreach my $cust_svc ( $cust_pkg->cust_svc ) {
my @cust_pkg = $cust_main->ncancelled_pkgs;
foreach my $cust_pkg ( @cust_pkg ) {
foreach my $cust_svc ( $cust_pkg->cust_svc ) {