print Dumper $json_response;  

$VAR1 = {
          'report' => [
                        {
                          'stat' => 1,
                          'timestamp' => '1360775722',
                          'status' => '"Active"',
                          'name' => '"09:15 am, 13 Feb, 2013"',
                          'id' => '200'
                        },
                        {
                          'stat' => 1,
                          'timestamp' => '1360775806',
                          'status' => '"Active"',
                          'name => '"09:16 am, 13 Feb, 2013"',
                          'id' => '199'
                        }
                   ],
         'username' => 'test'
};


##</code><code>##

 
foreach (  @{$json_response->{report}}  ){
  
  my %report;
  $report{status} = $_->{status};
  $report{id}    = $_->{id};
  
  print "CGGSID: $report{id}\n";
  print "Status: $report{status}\n\n";

}