foreach $pid (@pids) {
   my $result;
   $pid =~ /\|(.*)$/;
   $result = $1;
   push (@pidCans, $result);
}