Select Code to Download

#!/usr/bin/perl

#                  Usage: ./mine.pl [dimension]                       
+   #
...
#if you want to place a flag where you think there is a mine use "x 3 
+4" #

use strict;

my $dimension = $ARGV[0] || 10;

...
        check_square($x, $y);
    }
}