What I would do... store your point that is blank in an array @free = ([2,3]) Then do a while($ary = shift @free) Which will give you the first free point. Then write some code that looks at all the all the adjacent boxes. Open them all up, and if any of them have no mines near them, do a push @free, (new,point); What that will do is use @free as a stack, and basically recurse through it analyzing all necessary points until you are done.

You should probably also use a hash to store which points you have visited around the stack and ignore them. something like

# point is 3,5 $x = 3 $y = 5 next if $seen{"$x,$y")++; #checks and then increments in one line
Otherwise you could just loop infinately :) - Ant

In reply to Re: Need help with a minesweeper game by suaveant
in thread Need help with a minesweeper game by PsionicMan

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.