http://www.perlmonks.org?node_id=1095777


in reply to Sorting an Array

Note that creating an anonymous hash from lexical %entry is not needed. You can directly store a reference to it, as my will create a new one in the next iteration of the loop:
push @statements, \%entry;
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ