in reply to AoH sort & search

Try

sort {$a->{'date'} <=> $b->{'date'} || $a->{'dataentry'} <=> $b->{'dataentry'}} @AoH;

Check first comment in Sorting AoH by two keys for good explanation how it works.

In Section Seekers of Perl Wisdom