The problem was that the OID in $OID_ifTable was wrong, so the line return; was allways triggered and so no response was stored in this line $table->{$next} = $list->{$next};

while (@names) {
       $next = shift @names;
       if (!oid_base_match($OID_ifTable, $next)) {
          return; # Table is done.
       }
       $table->{$next} = $list->{$next};
[download]