my %all = $obj->GetALL();

foreach (keys %all) {
  # Other foreach here...
  $all{$_}{...}{...}
}