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