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

##</code><code>##

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