All the Perl that's Practical to Extract and Report
use Perl Log In
Limbic Region (3985)
(email not shown publicly)
http://gatcomb.org/joshua/perl.html
I love to code perl. If you want to hire me, see details on my homepage.
Journal of Limbic Region (3985)
Challenge: Setting Sun Puzzle
All,
I am sure the majority of you enjoy good brain teasers and puzzles. A few years ago, I received a wooden puzzle for Christmas that apparently can be solved in as few as 16 moves (unverified). I have never came close and wanted to see if my fellow monks were up to the challenge.
This is a picture of the starting position. The object of the game is to get the large square (red dot) to the position at the bottom occupied by the 4 small squares (blue dots). You may only move pieces by sliding them.
The challenge is to write a program that will solve the puzzle in the fewest number of moves possible. Graphic solutions are not necessary, but would be cool. Any solution method will be eligible (golfed, regex, bruteforce, etc). The solution must be able to be verified using the real puzzle
Cheers - L~R
:-)
--Larry Wall in <1991May31.181659.28817@jpl-devvax.jpl.nasa.gov>
Solution (Score:1)
My mother-in-law has the same game that I've hacked away at every xmas for years. This year I decided I'd cheat and crank it out. At first I thought I'd do it in java but then realized how easy it is to encode the game as a string and use regexps to find legal moves. My solution (which takes 110 moves) is here: http://www.cs.ubc.ca/~simra/settingsun/solution.txt [cs.ubc.ca]
The crufty, ugly perl script is: http://www.cs.ubc.ca/~simra/settingsun/ss.pl [cs.ubc.ca] I don't see how the 16 move claim can be realized, even wit
16 moves was false advertisement (Score:1)
Cheers
L~R
Setting sun (Score:1)