Help for this page
my $output = `test.bat`;
my $output = qx( test.bat );
use Capture::Tiny qw( capture ); ... { system 'test.bat'; };