How do you capture stderr, stdout, and the exit code all at once, in Perl?

by

(Update: I updated the API for IO::CaptureOutput to make this even easier.)

There are several ways to do this. Here’s one option, using the IO::CaptureOutput module:

use IO::CaptureOutput qw/capture_exec/;

my ($stdout, $stderr, $success, $exit_code) = capture_exec( @cmd );

This is the capture_exec() function, but IO::CaptureOutput also has a more general capture() function that can be used to capture either Perl output or output from external programs. So if some Perl module happens to use some external program, you still get the output.

It also means you only need to remember one single approach to capturing STDOUT and STDERR (or merging them) instead of using IPC::Open3 for external programs and other modules for capturing Perl output.

More Related Contents:

  1. Getting STDOUT, STDERR, and response code from external *nix command in perl
  2. Why does my Perl script exit with 137?
  3. Failing to install MIME::Base64 using cpan [closed]
  4. Declaring a 2D coordinate in Perl / C / C++ [closed]
  5. how to use multiple IP’s in perl script
  6. Why can’t Perl find my file that is in ClearCase?
  7. Difference of Two Arrays Using Perl
  8. How can I output UTF-8 from Perl?
  9. What’s the difference between a hash and hash reference in Perl?
  10. How can I hook into Perl’s print?
  11. How can I generate all permutations of an array in Perl?
  12. How can I combine hashes in Perl?
  13. Why do my Perl tests fail with use encoding ‘utf8’?
  14. How can I install CPAN modules locally without root access (DynaLoader.pm line 229 error)?
  15. What is the difference between my and local in Perl?
  16. Perl read line by line
  17. What is the difference between Perl’s ( or, and ) and ( ||, && ) short-circuit operators?
  18. How do I change, delete, or insert a line in a file, or append to the beginning of a file in Perl?
  19. How can I install a specific version of a set of Perl modules?
  20. Obtain a switch/case behaviour in Perl 5
  21. How do I extract the domain out of an URL?
  22. Why does $foo->{bar} autovivify but %$foo doesn’t?
  23. How do I break out of a loop in Perl?
  24. Hidden features of Perl?
  25. “inappropriate ioctl for device”
  26. In Perl, how can I check from which module a given function was imported?
  27. How can I verify that a value is present in an array (list) in Perl?
  28. Perl Subroutine Prototyping — The correct way to do it
  29. Why do hash keys have different order when printing?
  30. How can I manually interpolate string escapes in a Perl string?

Leave a Comment