Re^2: Sudoku solver

in reply to Re: Sudoku solver
in thread Sudoku solver

maybe like

print forgetR( ... );
sub forgetR {
    local @A;
    if( 1 == @_ ){
        @A = split //, @_;
    } else {
        @A = @_;
    }
    eval { R(); };
    warn "CAUGHT DEATH $@ ";
    return @A;
}
[download]

forgetR takes either a line (like from __DATA__) or a list

In Section Seekers of Perl Wisdom