I'm assuming that you're interested just in the "report" sub-structure, so I'm only sorting that part. And I'm assuming that you want a numerical sort for ID's.

use strict;
use warnings;
use Data::Dumper;

my $json_response = {
    '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'
};

my @sorted = sort { $a->{id} <=> $b->{id} } @{ $json_response->{report
+} };

print Dumper \@sorted;
[download]