Math::Bezier is a perl interface to solve Bezier curves.

--will