foreach $key(sort GPA_sort %students)
{
     #etc
}