#!/usr/local/ActivePerl-5.10/bin/perl -w
#This program uses the Syringe module (if I can get it to recognize it) to model
#the movement of particles in a rotating syringe.
use strict;
use warnings;
use Syringe;

use constant PI =>  4 * atan2 1, 1;

my $time_step = 0.1;    #s
my $syringe = Syringe->new();
...