Select Code to Download

my $t = new Proc::ProcessTable;
foreach my $p ( @{$t->table} ){
...
        }
    }
}

foreach my $p ( @{$t->table} ){
    if($p->cmndline =~ / member.cgi/) {