my %data
foreach my $key (sort keys %data) {
print "Key - $key  and b value - $data{$key}}

##</code><code>##

$VAR1 = 'Dec13';
$VAR2 = '2';
$VAR3 = 'May14';
$VAR4 = '2';
$VAR5 = 'Apr14';
$VAR6 = '2';
$VAR7 = 'Mar14';
$VAR8 = '2';

##</code><code>##

key - Apr14 and value - 2
key - Dec13 and value - 2
key - Mar14 and value - 2
key - May14 and value - 2

##</code><code>##

key - Dec13 and value - 2
key - Mar14 and value - 2
key - Apr14 and value - 2
key - May14 and value - 2