use Data::Dumper;
# All of your existing code goes here.

print Dumper \@sorted_recs;