CUFP ginseng I won't include all of the (mostly mundane) code, but I recently finished a Perl project that provided control logic for a robotic laser welder... <p>What is a robotic laser welder? In this case it's a four axis robot for welding small items with a 14 joule laser. The main controller is an Dell 1U rackmount, running OpenBSD, talking to a motion/IO controller. <p>In the spirit of recursion though, this also made for a "Cool Uses for Cool Uses for Perl", as we tested the entire device (sans laser-light-show) as a speaker for an electric bass guitar... check out <A HREF="http://www.wi2600.org/mediawhore/video/distant_early_warning.mpg"> this link</A> to see my buddy Xam playing it as a $ 6-figure amplifier. (Explanation - By controlling position of the axes based on an amplified bass guitar input, we made the entire device reverberate throughout the shop. The video has a decent audio track. We also tried hooking it to a Diamond Rio, not shown, but the frequency response range was much better suited to the bass.) <p>If you're disposed to checking it out, enjoy. I certainly enjoyed using Perl for this cool application.