##
my $errorArray = $data->{errors};
foreach my $error ( @{ $errorArray->{error} } ) {
print NEW "$error->{desc}\n";
}
####
HASH(0x7fb3d8973fa8)
$VAR1 = {
'desc' => 'Slave not running'
};
####
ARRAY(0x7ffc84006ad0)
$VAR1 = [
{
'desc' => 'Slave not running'
},
{
'desc' => 'TEST123'
}
];