Hello lovers of the great perl,
I have a problem with Net::OpenSSH which I don't quite understand.
My code calls a find command on a remote machine where I'm not able to run perl on so I just grab some information and process it somewhere else.
My problem is that capture2() does return undef in stdout when the result of the executed cli command starts with "00" (from my understanding).

$find = "find $args->{'path'}/ -name '$args->{'foo'}.*' -newer ~/start
+.txt ! -newer ~/end.txt | xargs grep -vh 'H\\|T' | awk -F, '{ if( \$1
+ !~ /\\// &    & \$1 >= $args->{'start'} && \$1 < $args->{'end'}){";
 
for (my $i = 1; $i <= $indices; $i++){
    $find .= "if(\$$args->{'index'.$i} ~ /^[0-9]+\$/ && \$$args->{'ind
+ex'.$i} >= $args->{'min'.$i} && \$$args->{'index'.$i} <= $args->{'max
+'.$i} ){ print \$$args->{'index'.$i} }";
}
$find .= "}}' | sort | uniq -c | awk '{print \$2,\",\",\$1}'";
($edr,$stderr) = $args->{'ssh'}->capture2($find);
if($stderr){ print $stderr;}

@edr = split /\n/, $edr;
[download]

That's the relevant output from debug where the cli command returns "00 , 99":

# io3 mloop, cin: 0, cout: 1, cerr: 0
# io3 fast, cin: 0, cout: 1, cerr: 0
# stdout, bytes read: 8 at offset 0
#> 30 30 20 2c 20 39 39 0a                                            
+                             | 00 , 99.
# io3 fast, cin: 0, cout: 1, cerr: 0
# stdout, bytes read: 0 at offset 8
# leaving _io3()
# _waitpid(22920) => pid: 22920, rc: 
Use of uninitialized value $edr in split at /home/bo/scripts/test.pl l
+ine 338.
[download]

This debug output shows a working example:

# io3 mloop, cin: 0, cout: 1, cerr: 1
# io3 fast, cin: 0, cout: 1, cerr: 1
# stdout, bytes read: 15 at offset 0
#> 39 39 30 31 30 32 20 2c 20 32 30 34 36 32 0a                       
+                             | 990102 , 20462.
# io3 fast, cin: 0, cout: 1, cerr: 1
# stdout, bytes read: 0 at offset 15
# stderr, bytes read: 0
# leaving _io3()
# _waitpid(22922) => pid: 22922, rc:
[download]

The cli sommand returns "990102 , 20462" and the script runs fine.
I noticed that stderr is missing in the previous debug output. Sometimes the cli comamnd returns more than one line that's why I split $edr into an array.
In the beginning I uses capture() instead of capture2() but I needed the stderr for troubleshooting so I stuck to it.
My understanding of the Net::OpenSSH code is not that good, so I'm asking for help, maybe it is intentionally returning undef. Thank you for your time, tuckito