$newp = archive_e->new();
           $newp->criteria($pdirective);
           $newp->name($pname);
           $newp->regex(\@regexes);
           $newp->file_owner($pfowner);
           $newp->file_group($pfgroup);
           $newp->vsn($fqvsn);
           print Dumper $newp;
           push(@ap, $newp);<-------Where it goes south?
           print "ap array starts here\n";
           print Dumper @ap;