Select Code to Download

for (7..14) {
    if ($buttons[$_]->Checked ()) {
        ... indicate found and exit loop ...
    }
}

for my $key (keys %buttons) {
    if ($buttons{$key}->Checked ()) {
        ... indicate found and exit loop ...
    }
}