Select Code to Download

report_block(\$report_data{$domain}{$provider});

...
  print Dumper($rpt_ref);
  #access elements here!
}

$VAR1 = \{
            'error' => 0,
...
            'hard_error' => 0,
            'ok' => 7
          };

print $rpt_ref{total};
#Global symbol "%rpt_ref" requires explicit package name...

print $rpt_ref->{total};
#Not a HASH reference at...