Question

I’m attempting to pass perl variables into a system command and then capture the output for later usage, here’s my current code:

my $updatedCmd = "|svn diff --summarize $svnOldFull $svnNewFull";
my $updatedUrls = '';
open UPDATES, $updatedCmd or die "Can't get updates";
while(<UPDATES>) {
  print $_;
}

print "THIS_SHOULD_OUTPUT_AT_THE_END\n";

The problem with this is that I get the output:

THIS_SHOULD_OUTPUT_AT_THE_END
A       /test
A       /test2
A       /deployment.txt

I would like to be able to capture all of the command output before allowing my perl script to go any further however.

Answer 1

You placed the pipe on the wrong end of your command. Try this:

my $updatedCmd = "svn diff --summarize $svnOldFull $svnNewFull|";