#!/usr/bin/perl -w
#
# "boxes.pl" -- randomly colored boxes
use strict;
use warnings;

system("spiral.pl -t -x -u 1 -n 10 -s 100 -w 8 -p 200,300 -i -.01 -a 85 95")