Help for this page

Select Code to Download

Select or download this

use IO::CaptureOutput qw/capture/;

...
capture sub {
  system($command);
} => \$stdout, \$stderr;