raster

#!/usr/bin/perl -w

use ExtUtils::Installed;

my $instmod = ExtUtils::Installed->new();

foreach my $module ($instmod->modules()) {

my $version = $instmod->version($module) || "???";
        print "$module -- $version\n";

raster

#!/usr/bin/perl

use Text::Banner;

$str  = $ARGV[0];
$size = $ARGV[1];
$char = $ARGV[2];

if (!(defined($size))) {
        $size = '2';

raster

/*
 * LightOrgan.pde - Arduino
 *
 * See also: http://rasterweb.net/raster/2011/01/19/shiftbrite-light-organ/ 
 *
 */

#include "HughesyShiftBrite.h"

HughesyShiftBrite sb;

raster

#!/usr/bin/perl
#
# See also: http://rasterweb.net/raster/2011/01/17/perl-arduino-shiftbrite/
#

use Device::SerialPort;

my $port = Device::SerialPort->new("/dev/tty.usbmodem1d21"); # ymmv here...
$port->databits(8);
$port->baudrate(9600);

raster

/*
 * ShiftBrite.pde
 *
 * See also: http://rasterweb.net/raster/2011/01/17/perl-arduino-shiftbrite/
 * See also: http://code.google.com/p/shiftbritehughesyarduino/
 *
 */

#include "HughesyShiftBrite.h"

raster

/*
 * Drawbot.pde
 *
 * See also: http://rasterweb.net/raster/2011/01/12/friday-night-drawbot/
 * See also: https://gist.github.com/778622
 * 
 */

int servoPinL = 9;
int servoPinR = 10;