Google is running some puzzle challenges as a follow up to their Da Vinci challenge.
The first puzzle was to use the numbers 3, 3, 8 and 8 to make an expression that was equal to 24.
I wrote a TCL program to solve it. I found someone else who wrote a Perl program to solve it.
Edit: I corrected a small problem with the program. I had the (x_x)_(x_x) pattern listed twice.
