Select Code to Download

sub frob_file {
    my $frobbable_filename = shift;
...

    ... frob file ...
}

sub zap_the_thing {
    my $t = shift;
...

    zap_files(@files_to_zap);
}

# ?NEED GOOD NAME?
# If a group (Row, Col, Blk) has only one slot for a particular value,
# solve that cell.
sub solve_v_in_only_one_cell_in_R_C_B {
    my ($self, $GEN) = @_;