Perl script to capture stderr and stdout of command executed in back-quotes

Question

In the following command which I execute in a Perl script, how do I capture stderr?

my $output = `ssh login.com git clone --bare [email protected]:/nfs/repo/ /nfs/repo//4124/`;
if ($? ne '0')
{ 
    $stderr = $output;
    print $stderr;
}
else
{
    $stdout = $output;
    print $stdout;
}

Answer 1

You can use Capture::Tiny to capture stdout, stderr or both merged.