Here’s a Perl script that demonstrates the new Bus Pirate binary bitbang mode. You’ll need Perl with Win32::SerialPort or Device::SerialPort, and a Bus Pirate with firmware v2.4 or later. Edit the script to use the correct serial port number and device.

We chose Perl because we had never used it before, and we weren’t in the mood for a strongly typed language like Python. Perl’s serial port situation isn’t as clean or universal as Python’s pySerial. Since the Bus Pirate already uses a Python firmware updater, using Python for binmode scripts seems preferable. Hopefully we’ll have some Python examples soon, but if you come up with something first, please share it in the forum.