Help for this page
my $inversions = 1; while ($inversions % 2) { @board = (0, shuffle(1..15)); ... } } }
my $inversions; do { $inversions = 0; ... } } } while $inversions % 2;
www.com | www.net | www.org
No recent polls found