XC9572XL.pl -> Perl script to program XC9572XL breakout board (http://numato.cc/content/cpld-breakout-kicad-and-little-inspiration). Usage "perl XC9572XL.pl COMx file.svf"
RunningLightsCPLD.svf -> Sample SVF file (reads switch SW1 on the board and turn on LED D3 when pressed).

You will need to install Win32::SerialPort from CPAN on Windows. this script is never tested on Linux, but should be able to make it work by using Device::Serialport (Minor script modification will be required.)