if (open my $cmdh, "$rcmd |") {
    ...