Select Code to Download

$flag_assignments{$key}{"starrez"} = $info[0];
$flag_assignments{$key}{"abbreviation"} = $info[1];
$flag_assignments{$key}{"greek"} = $info[2];
...
$flag_assignments{$key}{"RA-Summer"} = $info[8];
$flag_assignments{$key}{"NR-Fall"} = $info[9];
$flag_assignments{$key}{"NR-Spring"} = $info[10];

for my $key (sort keys %starrez) {
    if (exists $starrez{$key}{"dorm"}) {
...
        }
    }
}