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;
[download]